home *** CD-ROM | disk | FTP | other *** search
| Unknown | 2001-03-07 | 13.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 57 d7 01 63 6c 61 73 73 |........|W..class|
|00000010| 20 55 42 72 6f 77 73 65 | 72 53 65 72 76 65 72 4c | UBrowse|rServerL|
|00000020| 69 73 74 57 69 6e 64 6f | 77 20 65 78 74 65 6e 64 |istWindo|w extend|
|00000030| 73 20 55 57 69 6e 64 6f | 77 50 61 67 65 57 69 6e |s UWindo|wPageWin|
|00000040| 64 6f 77 0d 0a 09 50 65 | 72 4f 62 6a 65 63 74 43 |dow...Pe|rObjectC|
|00000050| 6f 6e 66 69 67 3b 0d 0a | 0d 0a 76 61 72 20 63 6f |onfig;..|..var co|
|00000060| 6e 66 69 67 20 73 74 72 | 69 6e 67 09 09 09 09 53 |nfig str|ing....S|
|00000070| 65 72 76 65 72 4c 69 73 | 74 54 69 74 6c 65 3b 09 |erverLis|tTitle;.|
|00000080| 2f 2f 20 4e 6f 6e 2d 6c | 6f 63 61 6c 69 7a 65 64 |// Non-l|ocalized|
|00000090| 20 70 61 67 65 20 74 69 | 74 6c 65 0d 0a 76 61 72 | page ti|tle..var|
|000000a0| 20 63 6f 6e 66 69 67 20 | 73 74 72 69 6e 67 09 09 | config |string..|
|000000b0| 09 09 4c 69 73 74 46 61 | 63 74 6f 72 69 65 73 5b |..ListFa|ctories[|
|000000c0| 31 30 5d 3b 0d 0a 76 61 | 72 20 63 6f 6e 66 69 67 |10];..va|r config|
|000000d0| 20 73 74 72 69 6e 67 09 | 09 09 09 55 52 4c 41 70 | string.|...URLAp|
|000000e0| 70 65 6e 64 3b 0d 0a 76 | 61 72 20 63 6f 6e 66 69 |pend;..v|ar confi|
|000000f0| 67 20 69 6e 74 09 09 09 | 09 09 41 75 74 6f 52 65 |g int...|..AutoRe|
|00000100| 66 72 65 73 68 54 69 6d | 65 3b 0d 0a 76 61 72 20 |freshTim|e;..var |
|00000110| 63 6f 6e 66 69 67 20 62 | 6f 6f 6c 09 09 09 09 09 |config b|ool.....|
|00000120| 62 4e 6f 41 75 74 6f 53 | 6f 72 74 3b 0d 0a 76 61 |bNoAutoS|ort;..va|
|00000130| 72 20 63 6f 6e 66 69 67 | 20 62 6f 6f 6c 09 09 09 |r config| bool...|
|00000140| 09 09 62 48 69 64 64 65 | 6e 3b 0d 0a 76 61 72 20 |..bHidde|n;..var |
|00000150| 63 6f 6e 66 69 67 20 62 | 6f 6f 6c 09 09 09 09 09 |config b|ool.....|
|00000160| 62 46 61 6c 6c 62 61 63 | 6b 46 61 63 74 6f 72 69 |bFallbac|kFactori|
|00000170| 65 73 3b 0d 0a 0d 0a 76 | 61 72 20 73 74 72 69 6e |es;....v|ar strin|
|00000180| 67 09 09 09 09 09 09 53 | 65 72 76 65 72 4c 69 73 |g......S|erverLis|
|00000190| 74 43 6c 61 73 73 4e 61 | 6d 65 3b 0d 0a 76 61 72 |tClassNa|me;..var|
|000001a0| 20 63 6c 61 73 73 3c 55 | 42 72 6f 77 73 65 72 53 | class<U|BrowserS|
|000001b0| 65 72 76 65 72 4c 69 73 | 74 3e 09 53 65 72 76 65 |erverLis|t>.Serve|
|000001c0| 72 4c 69 73 74 43 6c 61 | 73 73 3b 0d 0a 0d 0a 76 |rListCla|ss;....v|
|000001d0| 61 72 20 55 42 72 6f 77 | 73 65 72 53 65 72 76 65 |ar UBrow|serServe|
|000001e0| 72 4c 69 73 74 09 09 09 | 50 69 6e 67 65 64 4c 69 |rList...|PingedLi|
|000001f0| 73 74 3b 0d 0a 76 61 72 | 20 55 42 72 6f 77 73 65 |st;..var| UBrowse|
|00000200| 72 53 65 72 76 65 72 4c | 69 73 74 09 09 09 55 6e |rServerL|ist...Un|
|00000210| 70 69 6e 67 65 64 4c 69 | 73 74 3b 0d 0a 0d 0a 76 |pingedLi|st;....v|
|00000220| 61 72 20 55 42 72 6f 77 | 73 65 72 53 65 72 76 65 |ar UBrow|serServe|
|00000230| 72 4c 69 73 74 46 61 63 | 74 6f 72 79 09 46 61 63 |rListFac|tory.Fac|
|00000240| 74 6f 72 69 65 73 5b 31 | 30 5d 3b 0d 0a 76 61 72 |tories[1|0];..var|
|00000250| 20 69 6e 74 09 09 09 09 | 09 09 09 51 75 65 72 79 | int....|...Query|
|00000260| 44 6f 6e 65 5b 31 30 5d | 3b 0d 0a 76 61 72 20 55 |Done[10]|;..var U|
|00000270| 42 72 6f 77 73 65 72 53 | 65 72 76 65 72 47 72 69 |BrowserS|erverGri|
|00000280| 64 09 09 09 47 72 69 64 | 3b 0d 0a 76 61 72 20 73 |d...Grid|;..var s|
|00000290| 74 72 69 6e 67 09 09 09 | 09 09 09 47 72 69 64 43 |tring...|...GridC|
|000002a0| 6c 61 73 73 3b 0d 0a 76 | 61 72 20 66 6c 6f 61 74 |lass;..v|ar float|
|000002b0| 09 09 09 09 09 09 54 69 | 6d 65 45 6c 61 70 73 65 |......Ti|meElapse|
|000002c0| 64 3b 0d 0a 76 61 72 20 | 62 6f 6f 6c 09 09 09 09 |d;..var |bool....|
|000002d0| 09 09 62 50 69 6e 67 53 | 75 73 70 65 6e 64 3b 0d |..bPingS|uspend;.|
|000002e0| 0a 76 61 72 20 62 6f 6f | 6c 09 09 09 09 09 09 62 |.var boo|l......b|
|000002f0| 50 69 6e 67 52 65 73 75 | 6d 65 3b 0d 0a 76 61 72 |PingResu|me;..var|
|00000300| 20 62 6f 6f 6c 09 09 09 | 09 09 09 62 50 69 6e 67 | bool...|...bPing|
|00000310| 52 65 73 75 6d 65 49 6e | 74 69 61 6c 3b 0d 0a 76 |ResumeIn|tial;..v|
|00000320| 61 72 20 62 6f 6f 6c 09 | 09 09 09 09 09 62 4e 6f |ar bool.|.....bNo|
|00000330| 53 6f 72 74 3b 0d 0a 76 | 61 72 20 62 6f 6f 6c 09 |Sort;..v|ar bool.|
|00000340| 09 09 09 09 09 62 53 75 | 73 70 65 6e 64 50 69 6e |.....bSu|spendPin|
|00000350| 67 4f 6e 43 6c 6f 73 65 | 3b 0d 0a 76 61 72 20 55 |gOnClose|;..var U|
|00000360| 42 72 6f 77 73 65 72 53 | 75 62 73 65 74 4c 69 73 |BrowserS|ubsetLis|
|00000370| 74 09 09 09 53 75 62 73 | 65 74 4c 69 73 74 3b 0d |t...Subs|etList;.|
|00000380| 0a 76 61 72 20 55 42 72 | 6f 77 73 65 72 53 75 70 |.var UBr|owserSup|
|00000390| 65 72 73 65 74 4c 69 73 | 74 09 09 53 75 70 65 72 |ersetLis|t..Super|
|000003a0| 73 65 74 4c 69 73 74 3b | 0d 0a 76 61 72 20 63 6c |setList;|..var cl|
|000003b0| 61 73 73 3c 55 42 72 6f | 77 73 65 72 52 69 67 68 |ass<UBro|wserRigh|
|000003c0| 74 43 6c 69 63 6b 4d 65 | 6e 75 3e 09 52 69 67 68 |tClickMe|nu>.Righ|
|000003d0| 74 43 6c 69 63 6b 4d 65 | 6e 75 43 6c 61 73 73 3b |tClickMe|nuClass;|
|000003e0| 0d 0a 76 61 72 20 62 6f | 6f 6c 09 09 09 09 09 09 |..var bo|ol......|
|000003f0| 62 53 68 6f 77 46 61 69 | 6c 65 64 53 65 72 76 65 |bShowFai|ledServe|
|00000400| 72 73 3b 0d 0a 76 61 72 | 20 62 6f 6f 6c 09 09 09 |rs;..var| bool...|
|00000410| 09 09 09 62 48 61 64 49 | 6e 69 74 69 61 6c 52 65 |...bHadI|nitialRe|
|00000420| 66 72 65 73 68 3b 0d 0a | 76 61 72 20 69 6e 74 09 |fresh;..|var int.|
|00000430| 09 09 09 09 09 09 46 61 | 6c 6c 62 61 63 6b 46 61 |......Fa|llbackFa|
|00000440| 63 74 6f 72 79 3b 0d 0a | 0d 0a 76 61 72 20 55 57 |ctory;..|..var UW|
|00000450| 69 6e 64 6f 77 56 53 70 | 6c 69 74 74 65 72 09 09 |indowVSp|litter..|
|00000460| 09 56 53 70 6c 69 74 74 | 65 72 3b 0d 0a 76 61 72 |.VSplitt|er;..var|
|00000470| 20 55 42 72 6f 77 73 65 | 72 49 6e 66 6f 57 69 6e | UBrowse|rInfoWin|
|00000480| 64 6f 77 09 09 09 49 6e | 66 6f 57 69 6e 64 6f 77 |dow...In|foWindow|
|00000490| 3b 0d 0a 76 61 72 20 55 | 42 72 6f 77 73 65 72 49 |;..var U|BrowserI|
|000004a0| 6e 66 6f 43 6c 69 65 6e | 74 57 69 6e 64 6f 77 09 |nfoClien|tWindow.|
|000004b0| 49 6e 66 6f 43 6c 69 65 | 6e 74 3b 0d 0a 76 61 72 |InfoClie|nt;..var|
|000004c0| 20 55 42 72 6f 77 73 65 | 72 53 65 72 76 65 72 4c | UBrowse|rServerL|
|000004d0| 69 73 74 09 09 09 49 6e | 66 6f 49 74 65 6d 3b 0d |ist...In|foItem;.|
|000004e0| 0a 76 61 72 20 6c 6f 63 | 61 6c 69 7a 65 64 20 73 |.var loc|alized s|
|000004f0| 74 72 69 6e 67 09 09 09 | 49 6e 66 6f 4e 61 6d 65 |tring...|InfoName|
|00000500| 3b 0d 0a 0d 0a 63 6f 6e | 73 74 20 4d 69 6e 48 65 |;....con|st MinHe|
|00000510| 69 67 68 74 46 6f 72 53 | 70 6c 69 74 74 65 72 20 |ightForS|plitter |
|00000520| 3d 20 33 38 34 3b 0d 0a | 0d 0a 76 61 72 20 6c 6f |= 384;..|..var lo|
|00000530| 63 61 6c 69 7a 65 64 20 | 73 74 72 69 6e 67 09 09 |calized |string..|
|00000540| 09 50 6c 61 79 65 72 43 | 6f 75 6e 74 4c 65 61 64 |.PlayerC|ountLead|
|00000550| 65 72 3b 0d 0a 76 61 72 | 20 6c 6f 63 61 6c 69 7a |er;..var| localiz|
|00000560| 65 64 20 73 74 72 69 6e | 67 09 09 09 53 65 72 76 |ed strin|g...Serv|
|00000570| 65 72 43 6f 75 6e 74 4c | 65 61 64 65 72 3b 0d 0a |erCountL|eader;..|
|00000580| 0d 0a 0d 0a 2f 2f 20 53 | 74 61 74 75 73 20 69 6e |....// S|tatus in|
|00000590| 66 6f 0d 0a 65 6e 75 6d | 20 45 50 69 6e 67 53 74 |fo..enum| EPingSt|
|000005a0| 61 74 65 0d 0a 7b 0d 0a | 09 50 53 5f 51 75 65 72 |ate..{..|.PS_Quer|
|000005b0| 79 53 65 72 76 65 72 2c | 0d 0a 09 50 53 5f 51 75 |yServer,|...PS_Qu|
|000005c0| 65 72 79 46 61 69 6c 65 | 64 2c 0d 0a 09 50 53 5f |eryFaile|d,...PS_|
|000005d0| 50 69 6e 67 69 6e 67 2c | 0d 0a 09 50 53 5f 52 65 |Pinging,|...PS_Re|
|000005e0| 50 69 6e 67 69 6e 67 2c | 0d 0a 09 50 53 5f 44 6f |Pinging,|...PS_Do|
|000005f0| 6e 65 0d 0a 7d 3b 0d 0a | 0d 0a 76 61 72 20 6c 6f |ne..};..|..var lo|
|00000600| 63 61 6c 69 7a 65 64 20 | 73 74 72 69 6e 67 09 09 |calized |string..|
|00000610| 09 50 6c 61 79 65 72 43 | 6f 75 6e 74 4e 61 6d 65 |.PlayerC|ountName|
|00000620| 3b 0d 0a 76 61 72 20 6c | 6f 63 61 6c 69 7a 65 64 |;..var l|ocalized|
|00000630| 20 73 74 72 69 6e 67 09 | 09 09 53 65 72 76 65 72 | string.|..Server|
|00000640| 43 6f 75 6e 74 4e 61 6d | 65 3b 0d 0a 76 61 72 09 |CountNam|e;..var.|
|00000650| 6c 6f 63 61 6c 69 7a 65 | 64 20 73 74 72 69 6e 67 |localize|d string|
|00000660| 09 09 09 51 75 65 72 79 | 53 65 72 76 65 72 54 65 |...Query|ServerTe|
|00000670| 78 74 3b 0d 0a 76 61 72 | 09 6c 6f 63 61 6c 69 7a |xt;..var|.localiz|
|00000680| 65 64 20 73 74 72 69 6e | 67 09 09 09 51 75 65 72 |ed strin|g...Quer|
|00000690| 79 46 61 69 6c 65 64 54 | 65 78 74 3b 0d 0a 76 61 |yFailedT|ext;..va|
|000006a0| 72 09 6c 6f 63 61 6c 69 | 7a 65 64 20 73 74 72 69 |r.locali|zed stri|
|000006b0| 6e 67 09 09 09 50 69 6e | 67 69 6e 67 54 65 78 74 |ng...Pin|gingText|
|000006c0| 3b 0d 0a 76 61 72 09 6c | 6f 63 61 6c 69 7a 65 64 |;..var.l|ocalized|
|000006d0| 20 73 74 72 69 6e 67 09 | 09 09 43 6f 6d 70 6c 65 | string.|..Comple|
|000006e0| 74 65 54 65 78 74 3b 0d | 0a 0d 0a 76 61 72 20 73 |teText;.|...var s|
|000006f0| 74 72 69 6e 67 09 09 09 | 09 09 09 45 72 72 6f 72 |tring...|...Error|
|00000700| 53 74 72 69 6e 67 3b 0d | 0a 76 61 72 20 45 50 69 |String;.|.var EPi|
|00000710| 6e 67 53 74 61 74 65 09 | 09 09 09 09 50 69 6e 67 |ngState.|....Ping|
|00000720| 53 74 61 74 65 3b 0d 0a | 0d 0a 66 75 6e 63 74 69 |State;..|..functi|
|00000730| 6f 6e 20 57 69 6e 64 6f | 77 53 68 6f 77 6e 28 29 |on Windo|wShown()|
|00000740| 0d 0a 7b 0d 0a 09 6c 6f | 63 61 6c 20 55 42 72 6f |..{...lo|cal UBro|
|00000750| 77 73 65 72 53 75 70 65 | 72 73 65 74 4c 69 73 74 |wserSupe|rsetList|
|00000760| 20 6c 3b 0d 0a 0d 0a 09 | 53 75 70 65 72 2e 57 69 | l;.....|Super.Wi|
|00000770| 6e 64 6f 77 53 68 6f 77 | 6e 28 29 3b 0d 0a 09 69 |ndowShow|n();...i|
|00000780| 66 28 56 53 70 6c 69 74 | 74 65 72 2e 62 57 69 6e |f(VSplit|ter.bWin|
|00000790| 64 6f 77 56 69 73 69 62 | 6c 65 29 0d 0a 09 7b 0d |dowVisib|le)...{.|
|000007a0| 0a 09 09 69 66 28 55 57 | 69 6e 64 6f 77 56 53 70 |...if(UW|indowVSp|
|000007b0| 6c 69 74 74 65 72 28 49 | 6e 66 6f 43 6c 69 65 6e |litter(I|nfoClien|
|000007c0| 74 2e 50 61 72 65 6e 74 | 57 69 6e 64 6f 77 29 20 |t.Parent|Window) |
|000007d0| 21 3d 20 4e 6f 6e 65 29 | 0d 0a 09 09 09 56 53 70 |!= None)|.....VSp|
|000007e0| 6c 69 74 74 65 72 2e 53 | 70 6c 69 74 50 6f 73 20 |litter.S|plitPos |
|000007f0| 3d 20 55 57 69 6e 64 6f | 77 56 53 70 6c 69 74 74 |= UWindo|wVSplitt|
|00000800| 65 72 28 49 6e 66 6f 43 | 6c 69 65 6e 74 2e 50 61 |er(InfoC|lient.Pa|
|00000810| 72 65 6e 74 57 69 6e 64 | 6f 77 29 2e 53 70 6c 69 |rentWind|ow).Spli|
|00000820| 74 50 6f 73 3b 0d 0a 0d | 0a 09 09 49 6e 66 6f 43 |tPos;...|...InfoC|
|00000830| 6c 69 65 6e 74 2e 53 65 | 74 50 61 72 65 6e 74 28 |lient.Se|tParent(|
|00000840| 56 53 70 6c 69 74 74 65 | 72 29 3b 0d 0a 09 7d 0d |VSplitte|r);...}.|
|00000850| 0a 0d 0a 09 49 6e 66 6f | 43 6c 69 65 6e 74 2e 53 |....Info|Client.S|
|00000860| 65 72 76 65 72 20 3d 20 | 49 6e 66 6f 49 74 65 6d |erver = |InfoItem|
|00000870| 3b 0d 0a 09 69 66 28 49 | 6e 66 6f 49 74 65 6d 20 |;...if(I|nfoItem |
|00000880| 21 3d 20 4e 6f 6e 65 29 | 0d 0a 09 09 49 6e 66 6f |!= None)|....Info|
|00000890| 57 69 6e 64 6f 77 2e 57 | 69 6e 64 6f 77 54 69 74 |Window.W|indowTit|
|000008a0| 6c 65 20 3d 20 49 6e 66 | 6f 4e 61 6d 65 24 22 20 |le = Inf|oName$" |
|000008b0| 2d 20 22 24 49 6e 66 6f | 49 74 65 6d 2e 48 6f 73 |- "$Info|Item.Hos|
|000008c0| 74 4e 61 6d 65 3b 0d 0a | 09 65 6c 73 65 0d 0a 09 |tName;..|.else...|
|000008d0| 09 49 6e 66 6f 57 69 6e | 64 6f 77 2e 57 69 6e 64 |.InfoWin|dow.Wind|
|000008e0| 6f 77 54 69 74 6c 65 20 | 3d 20 49 6e 66 6f 4e 61 |owTitle |= InfoNa|
|000008f0| 6d 65 3b 0d 0a 0d 0a 09 | 52 65 73 75 6d 65 50 69 |me;.....|ResumePi|
|00000900| 6e 67 69 6e 67 28 29 3b | 0d 0a 0d 0a 09 66 6f 72 |nging();|.....for|
|00000910| 28 6c 20 3d 20 55 42 72 | 6f 77 73 65 72 53 75 70 |(l = UBr|owserSup|
|00000920| 65 72 73 65 74 4c 69 73 | 74 28 53 75 70 65 72 73 |ersetLis|t(Supers|
|00000930| 65 74 4c 69 73 74 2e 4e | 65 78 74 29 3b 20 6c 20 |etList.N|ext); l |
|00000940| 21 3d 20 4e 6f 6e 65 3b | 20 6c 20 3d 20 55 42 72 |!= None;| l = UBr|
|00000950| 6f 77 73 65 72 53 75 70 | 65 72 73 65 74 4c 69 73 |owserSup|ersetLis|
|00000960| 74 28 6c 2e 4e 65 78 74 | 29 29 0d 0a 09 09 6c 2e |t(l.Next|))....l.|
|00000970| 53 75 70 65 72 53 65 74 | 57 69 6e 64 6f 77 2e 52 |SuperSet|Window.R|
|00000980| 65 73 75 6d 65 50 69 6e | 67 69 6e 67 28 29 3b 0d |esumePin|ging();.|
|00000990| 0a 7d 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 57 |.}....fu|nction W|
|000009a0| 69 6e 64 6f 77 48 69 64 | 64 65 6e 28 29 0d 0a 7b |indowHid|den()..{|
|000009b0| 0d 0a 09 6c 6f 63 61 6c | 20 55 42 72 6f 77 73 65 |...local| UBrowse|
|000009c0| 72 53 75 70 65 72 73 65 | 74 4c 69 73 74 20 6c 3b |rSuperse|tList l;|
|000009d0| 0d 0a 0d 0a 09 53 75 70 | 65 72 2e 57 69 6e 64 6f |.....Sup|er.Windo|
|000009e0| 77 48 69 64 64 65 6e 28 | 29 3b 0d 0a 09 53 75 73 |wHidden(|);...Sus|
|000009f0| 70 65 6e 64 50 69 6e 67 | 69 6e 67 28 29 3b 0d 0a |pendPing|ing();..|
|00000a00| 0d 0a 09 66 6f 72 28 6c | 20 3d 20 55 42 72 6f 77 |...for(l| = UBrow|
|00000a10| 73 65 72 53 75 70 65 72 | 73 65 74 4c 69 73 74 28 |serSuper|setList(|
|00000a20| 53 75 70 65 72 73 65 74 | 4c 69 73 74 2e 4e 65 78 |Superset|List.Nex|
|00000a30| 74 29 3b 20 6c 20 21 3d | 20 4e 6f 6e 65 3b 20 6c |t); l !=| None; l|
|00000a40| 20 3d 20 55 42 72 6f 77 | 73 65 72 53 75 70 65 72 | = UBrow|serSuper|
|00000a50| 73 65 74 4c 69 73 74 28 | 6c 2e 4e 65 78 74 29 29 |setList(|l.Next))|
|00000a60| 0d 0a 09 09 6c 2e 53 75 | 70 65 72 53 65 74 57 69 |....l.Su|perSetWi|
|00000a70| 6e 64 6f 77 2e 53 75 73 | 70 65 6e 64 50 69 6e 67 |ndow.Sus|pendPing|
|00000a80| 69 6e 67 28 29 3b 0d 0a | 7d 0d 0a 0d 0a 66 75 6e |ing();..|}....fun|
|00000a90| 63 74 69 6f 6e 20 53 75 | 73 70 65 6e 64 50 69 6e |ction Su|spendPin|
|00000aa0| 67 69 6e 67 28 29 0d 0a | 7b 0d 0a 09 69 66 28 62 |ging()..|{...if(b|
|00000ab0| 53 75 73 70 65 6e 64 50 | 69 6e 67 4f 6e 43 6c 6f |SuspendP|ingOnClo|
|00000ac0| 73 65 29 0d 0a 09 09 62 | 50 69 6e 67 53 75 73 70 |se)....b|PingSusp|
|00000ad0| 65 6e 64 20 3d 20 54 72 | 75 65 3b 0d 0a 7d 0d 0a |end = Tr|ue;..}..|
|00000ae0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 52 65 73 75 6d |..functi|on Resum|
|00000af0| 65 50 69 6e 67 69 6e 67 | 28 29 0d 0a 7b 0d 0a 09 |ePinging|()..{...|
|00000b00| 69 66 28 21 62 48 61 64 | 49 6e 69 74 69 61 6c 52 |if(!bHad|InitialR|
|00000b10| 65 66 72 65 73 68 29 0d | 0a 09 09 52 65 66 72 65 |efresh).|...Refre|
|00000b20| 73 68 28 46 61 6c 73 65 | 2c 20 54 72 75 65 29 3b |sh(False|, True);|
|00000b30| 09 0d 0a 0d 0a 09 62 50 | 69 6e 67 53 75 73 70 65 |......bP|ingSuspe|
|00000b40| 6e 64 20 3d 20 46 61 6c | 73 65 3b 0d 0a 09 69 66 |nd = Fal|se;...if|
|00000b50| 28 62 50 69 6e 67 52 65 | 73 75 6d 65 29 0d 0a 09 |(bPingRe|sume)...|
|00000b60| 7b 0d 0a 09 09 62 50 69 | 6e 67 52 65 73 75 6d 65 |{....bPi|ngResume|
|00000b70| 20 3d 20 46 61 6c 73 65 | 3b 0d 0a 09 09 55 6e 70 | = False|;....Unp|
|00000b80| 69 6e 67 65 64 4c 69 73 | 74 2e 50 69 6e 67 4e 65 |ingedLis|t.PingNe|
|00000b90| 78 74 28 62 50 69 6e 67 | 52 65 73 75 6d 65 49 6e |xt(bPing|ResumeIn|
|00000ba0| 74 69 61 6c 2c 20 62 4e | 6f 53 6f 72 74 29 3b 0d |tial, bN|oSort);.|
|00000bb0| 0a 09 7d 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |..}..}..|..functi|
|00000bc0| 6f 6e 20 43 72 65 61 74 | 65 64 28 29 0d 0a 7b 0d |on Creat|ed()..{.|
|00000bd0| 0a 09 6c 6f 63 61 6c 20 | 43 6c 61 73 73 3c 55 42 |..local |Class<UB|
|00000be0| 72 6f 77 73 65 72 53 65 | 72 76 65 72 47 72 69 64 |rowserSe|rverGrid|
|00000bf0| 3e 20 43 3b 0d 0a 09 0d | 0a 09 53 65 72 76 65 72 |> C;....|..Server|
|00000c00| 4c 69 73 74 43 6c 61 73 | 73 20 3d 20 63 6c 61 73 |ListClas|s = clas|
|00000c10| 73 3c 55 42 72 6f 77 73 | 65 72 53 65 72 76 65 72 |s<UBrows|erServer|
|00000c20| 4c 69 73 74 3e 28 44 79 | 6e 61 6d 69 63 4c 6f 61 |List>(Dy|namicLoa|
|00000c30| 64 4f 62 6a 65 63 74 28 | 53 65 72 76 65 72 4c 69 |dObject(|ServerLi|
|00000c40| 73 74 43 6c 61 73 73 4e | 61 6d 65 2c 20 63 6c 61 |stClassN|ame, cla|
|00000c50| 73 73 27 43 6c 61 73 73 | 27 29 29 3b 0d 0a 09 43 |ss'Class|'));...C|
|00000c60| 20 3d 20 63 6c 61 73 73 | 3c 55 42 72 6f 77 73 65 | = class|<UBrowse|
|00000c70| 72 53 65 72 76 65 72 47 | 72 69 64 3e 28 44 79 6e |rServerG|rid>(Dyn|
|00000c80| 61 6d 69 63 4c 6f 61 64 | 4f 62 6a 65 63 74 28 47 |amicLoad|Object(G|
|00000c90| 72 69 64 43 6c 61 73 73 | 2c 20 63 6c 61 73 73 27 |ridClass|, class'|
|00000ca0| 43 6c 61 73 73 27 29 29 | 3b 0d 0a 09 47 72 69 64 |Class'))|;...Grid|
|00000cb0| 20 3d 20 55 42 72 6f 77 | 73 65 72 53 65 72 76 65 | = UBrow|serServe|
|00000cc0| 72 47 72 69 64 28 43 72 | 65 61 74 65 57 69 6e 64 |rGrid(Cr|eateWind|
|00000cd0| 6f 77 28 43 2c 20 30 2c | 20 30 2c 20 57 69 6e 57 |ow(C, 0,| 0, WinW|
|00000ce0| 69 64 74 68 2c 20 57 69 | 6e 48 65 69 67 68 74 29 |idth, Wi|nHeight)|
|00000cf0| 29 3b 0d 0a 09 47 72 69 | 64 2e 53 65 74 41 63 63 |);...Gri|d.SetAcc|
|00000d00| 65 70 74 73 46 6f 63 75 | 73 28 29 3b 0d 0a 0d 0a |eptsFocu|s();....|
|00000d10| 09 53 75 62 73 65 74 4c | 69 73 74 20 3d 20 6e 65 |.SubsetL|ist = ne|
|00000d20| 77 20 63 6c 61 73 73 27 | 55 42 72 6f 77 73 65 72 |w class'|UBrowser|
|00000d30| 53 75 62 73 65 74 4c 69 | 73 74 27 3b 0d 0a 09 53 |SubsetLi|st';...S|
|00000d40| 75 62 73 65 74 4c 69 73 | 74 2e 53 65 74 75 70 53 |ubsetLis|t.SetupS|
|00000d50| 65 6e 74 69 6e 65 6c 28 | 29 3b 0d 0a 0d 0a 09 53 |entinel(|);.....S|
|00000d60| 75 70 65 72 73 65 74 4c | 69 73 74 20 3d 20 6e 65 |upersetL|ist = ne|
|00000d70| 77 20 63 6c 61 73 73 27 | 55 42 72 6f 77 73 65 72 |w class'|UBrowser|
|00000d80| 53 75 70 65 72 73 65 74 | 4c 69 73 74 27 3b 0d 0a |Superset|List';..|
|00000d90| 09 53 75 70 65 72 73 65 | 74 4c 69 73 74 2e 53 65 |.Superse|tList.Se|
|00000da0| 74 75 70 53 65 6e 74 69 | 6e 65 6c 28 29 3b 0d 0a |tupSenti|nel();..|
|00000db0| 0d 0a 09 56 53 70 6c 69 | 74 74 65 72 20 3d 20 55 |...VSpli|tter = U|
|00000dc0| 57 69 6e 64 6f 77 56 53 | 70 6c 69 74 74 65 72 28 |WindowVS|plitter(|
|00000dd0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 28 63 6c 61 |CreateWi|ndow(cla|
|00000de0| 73 73 27 55 57 69 6e 64 | 6f 77 56 53 70 6c 69 74 |ss'UWind|owVSplit|
|00000df0| 74 65 72 27 2c 20 30 2c | 20 30 2c 20 57 69 6e 57 |ter', 0,| 0, WinW|
|00000e00| 69 64 74 68 2c 20 57 69 | 6e 48 65 69 67 68 74 29 |idth, Wi|nHeight)|
|00000e10| 29 3b 0d 0a 09 56 53 70 | 6c 69 74 74 65 72 2e 53 |);...VSp|litter.S|
|00000e20| 65 74 41 63 63 65 70 74 | 73 46 6f 63 75 73 28 29 |etAccept|sFocus()|
|00000e30| 3b 0d 0a 09 56 53 70 6c | 69 74 74 65 72 2e 4d 69 |;...VSpl|itter.Mi|
|00000e40| 6e 57 69 6e 48 65 69 67 | 68 74 20 3d 20 36 30 3b |nWinHeig|ht = 60;|
|00000e50| 0d 0a 09 56 53 70 6c 69 | 74 74 65 72 2e 48 69 64 |...VSpli|tter.Hid|
|00000e60| 65 57 69 6e 64 6f 77 28 | 29 3b 0d 0a 09 49 6e 66 |eWindow(|);...Inf|
|00000e70| 6f 57 69 6e 64 6f 77 20 | 3d 20 55 42 72 6f 77 73 |oWindow |= UBrows|
|00000e80| 65 72 4d 61 69 6e 43 6c | 69 65 6e 74 57 69 6e 64 |erMainCl|ientWind|
|00000e90| 6f 77 28 47 65 74 50 61 | 72 65 6e 74 28 63 6c 61 |ow(GetPa|rent(cla|
|00000ea0| 73 73 27 55 42 72 6f 77 | 73 65 72 4d 61 69 6e 43 |ss'UBrow|serMainC|
|00000eb0| 6c 69 65 6e 74 57 69 6e | 64 6f 77 27 29 29 2e 49 |lientWin|dow')).I|
|00000ec0| 6e 66 6f 57 69 6e 64 6f | 77 3b 0d 0a 09 49 6e 66 |nfoWindo|w;...Inf|
|00000ed0| 6f 43 6c 69 65 6e 74 20 | 3d 20 55 42 72 6f 77 73 |oClient |= UBrows|
|00000ee0| 65 72 49 6e 66 6f 43 6c | 69 65 6e 74 57 69 6e 64 |erInfoCl|ientWind|
|00000ef0| 6f 77 28 49 6e 66 6f 57 | 69 6e 64 6f 77 2e 43 6c |ow(InfoW|indow.Cl|
|00000f00| 69 65 6e 74 41 72 65 61 | 29 3b 0d 0a 0d 0a 09 69 |ientArea|);.....i|
|00000f10| 66 28 52 6f 6f 74 2e 57 | 69 6e 48 65 69 67 68 74 |f(Root.W|inHeight|
|00000f20| 20 3e 3d 20 4d 69 6e 48 | 65 69 67 68 74 46 6f 72 | >= MinH|eightFor|
|00000f30| 53 70 6c 69 74 74 65 72 | 29 0d 0a 09 09 53 68 6f |Splitter|)....Sho|
|00000f40| 77 49 6e 66 6f 41 72 65 | 61 28 54 72 75 65 2c 20 |wInfoAre|a(True, |
|00000f50| 46 61 6c 73 65 29 3b 0d | 0a 7d 0d 0a 0d 0a 66 75 |False);.|.}....fu|
|00000f60| 6e 63 74 69 6f 6e 20 53 | 68 6f 77 49 6e 66 6f 41 |nction S|howInfoA|
|00000f70| 72 65 61 28 62 6f 6f 6c | 20 62 53 68 6f 77 2c 20 |rea(bool| bShow, |
|00000f80| 6f 70 74 69 6f 6e 61 6c | 20 62 6f 6f 6c 20 62 46 |optional| bool bF|
|00000f90| 6c 6f 61 74 69 6e 67 2c | 20 6f 70 74 69 6f 6e 61 |loating,| optiona|
|00000fa0| 6c 20 62 6f 6f 6c 20 62 | 4e 6f 41 63 74 69 76 61 |l bool b|NoActiva|
|00000fb0| 74 65 29 0d 0a 7b 0d 0a | 09 69 66 28 62 53 68 6f |te)..{..|.if(bSho|
|00000fc0| 77 29 0d 0a 09 7b 0d 0a | 09 09 69 66 28 62 46 6c |w)...{..|..if(bFl|
|00000fd0| 6f 61 74 69 6e 67 29 0d | 0a 09 09 7b 0d 0a 09 09 |oating).|...{....|
|00000fe0| 09 56 53 70 6c 69 74 74 | 65 72 2e 48 69 64 65 57 |.VSplitt|er.HideW|
|00000ff0| 69 6e 64 6f 77 28 29 3b | 0d 0a 09 09 09 56 53 70 |indow();|.....VSp|
|00001000| 6c 69 74 74 65 72 2e 54 | 6f 70 43 6c 69 65 6e 74 |litter.T|opClient|
|00001010| 57 69 6e 64 6f 77 20 3d | 20 4e 6f 6e 65 3b 0d 0a |Window =| None;..|
|00001020| 09 09 09 56 53 70 6c 69 | 74 74 65 72 2e 42 6f 74 |...VSpli|tter.Bot|
|00001030| 74 6f 6d 43 6c 69 65 6e | 74 57 69 6e 64 6f 77 20 |tomClien|tWindow |
|00001040| 3d 20 4e 6f 6e 65 3b 0d | 0a 09 09 09 49 6e 66 6f |= None;.|....Info|
|00001050| 43 6c 69 65 6e 74 2e 53 | 65 74 50 61 72 65 6e 74 |Client.S|etParent|
|00001060| 28 49 6e 66 6f 57 69 6e | 64 6f 77 29 3b 0d 0a 09 |(InfoWin|dow);...|
|00001070| 09 09 47 72 69 64 2e 53 | 65 74 50 61 72 65 6e 74 |..Grid.S|etParent|
|00001080| 28 53 65 6c 66 29 3b 0d | 0a 09 09 09 47 72 69 64 |(Self);.|....Grid|
|00001090| 2e 53 65 74 53 69 7a 65 | 28 57 69 6e 57 69 64 74 |.SetSize|(WinWidt|
|000010a0| 68 2c 20 57 69 6e 48 65 | 69 67 68 74 29 3b 0d 0a |h, WinHe|ight);..|
|000010b0| 09 09 09 69 66 28 21 49 | 6e 66 6f 57 69 6e 64 6f |...if(!I|nfoWindo|
|000010c0| 77 2e 62 57 69 6e 64 6f | 77 56 69 73 69 62 6c 65 |w.bWindo|wVisible|
|000010d0| 29 0d 0a 09 09 09 09 49 | 6e 66 6f 57 69 6e 64 6f |)......I|nfoWindo|
|000010e0| 77 2e 53 68 6f 77 57 69 | 6e 64 6f 77 28 29 3b 0d |w.ShowWi|ndow();.|
|000010f0| 0a 09 09 09 69 66 28 21 | 62 4e 6f 41 63 74 69 76 |....if(!|bNoActiv|
|00001100| 61 74 65 29 0d 0a 09 09 | 09 09 49 6e 66 6f 57 69 |ate)....|..InfoWi|
|00001110| 6e 64 6f 77 2e 42 72 69 | 6e 67 54 6f 46 72 6f 6e |ndow.Bri|ngToFron|
|00001120| 74 28 29 3b 0d 0a 09 09 | 7d 0d 0a 09 09 65 6c 73 |t();....|}....els|
|00001130| 65 0d 0a 09 09 7b 0d 0a | 09 09 09 49 6e 66 6f 57 |e....{..|...InfoW|
|00001140| 69 6e 64 6f 77 2e 48 69 | 64 65 57 69 6e 64 6f 77 |indow.Hi|deWindow|
|00001150| 28 29 3b 0d 0a 09 09 09 | 56 53 70 6c 69 74 74 65 |();.....|VSplitte|
|00001160| 72 2e 53 68 6f 77 57 69 | 6e 64 6f 77 28 29 3b 0d |r.ShowWi|ndow();.|
|00001170| 0a 09 09 09 56 53 70 6c | 69 74 74 65 72 2e 53 65 |....VSpl|itter.Se|
|00001180| 74 53 69 7a 65 28 57 69 | 6e 57 69 64 74 68 2c 20 |tSize(Wi|nWidth, |
|00001190| 57 69 6e 48 65 69 67 68 | 74 29 3b 0d 0a 09 09 09 |WinHeigh|t);.....|
|000011a0| 47 72 69 64 2e 53 65 74 | 50 61 72 65 6e 74 28 56 |Grid.Set|Parent(V|
|000011b0| 53 70 6c 69 74 74 65 72 | 29 3b 0d 0a 09 09 09 49 |Splitter|);.....I|
|000011c0| 6e 66 6f 43 6c 69 65 6e | 74 2e 53 65 74 50 61 72 |nfoClien|t.SetPar|
|000011d0| 65 6e 74 28 56 53 70 6c | 69 74 74 65 72 29 3b 0d |ent(VSpl|itter);.|
|000011e0| 0a 09 09 09 56 53 70 6c | 69 74 74 65 72 2e 54 6f |....VSpl|itter.To|
|000011f0| 70 43 6c 69 65 6e 74 57 | 69 6e 64 6f 77 20 3d 20 |pClientW|indow = |
|00001200| 47 72 69 64 3b 0d 0a 09 | 09 09 56 53 70 6c 69 74 |Grid;...|..VSplit|
|00001210| 74 65 72 2e 42 6f 74 74 | 6f 6d 43 6c 69 65 6e 74 |ter.Bott|omClient|
|00001220| 57 69 6e 64 6f 77 20 3d | 20 49 6e 66 6f 43 6c 69 |Window =| InfoCli|
|00001230| 65 6e 74 3b 0d 0a 09 09 | 7d 0d 0a 09 7d 0d 0a 09 |ent;....|}...}...|
|00001240| 65 6c 73 65 0d 0a 09 7b | 0d 0a 09 09 49 6e 66 6f |else...{|....Info|
|00001250| 57 69 6e 64 6f 77 2e 48 | 69 64 65 57 69 6e 64 6f |Window.H|ideWindo|
|00001260| 77 28 29 3b 0d 0a 09 09 | 56 53 70 6c 69 74 74 65 |w();....|VSplitte|
|00001270| 72 2e 48 69 64 65 57 69 | 6e 64 6f 77 28 29 3b 0d |r.HideWi|ndow();.|
|00001280| 0a 09 09 56 53 70 6c 69 | 74 74 65 72 2e 54 6f 70 |...VSpli|tter.Top|
|00001290| 43 6c 69 65 6e 74 57 69 | 6e 64 6f 77 20 3d 20 4e |ClientWi|ndow = N|
|000012a0| 6f 6e 65 3b 0d 0a 09 09 | 56 53 70 6c 69 74 74 65 |one;....|VSplitte|
|000012b0| 72 2e 42 6f 74 74 6f 6d | 43 6c 69 65 6e 74 57 69 |r.Bottom|ClientWi|
|000012c0| 6e 64 6f 77 20 3d 20 4e | 6f 6e 65 3b 0d 0a 09 09 |ndow = N|one;....|
|000012d0| 49 6e 66 6f 43 6c 69 65 | 6e 74 2e 53 65 74 50 61 |InfoClie|nt.SetPa|
|000012e0| 72 65 6e 74 28 49 6e 66 | 6f 57 69 6e 64 6f 77 29 |rent(Inf|oWindow)|
|000012f0| 3b 0d 0a 09 09 47 72 69 | 64 2e 53 65 74 50 61 72 |;....Gri|d.SetPar|
|00001300| 65 6e 74 28 53 65 6c 66 | 29 3b 0d 0a 09 09 47 72 |ent(Self|);....Gr|
|00001310| 69 64 2e 53 65 74 53 69 | 7a 65 28 57 69 6e 57 69 |id.SetSi|ze(WinWi|
|00001320| 64 74 68 2c 20 57 69 6e | 48 65 69 67 68 74 29 3b |dth, Win|Height);|
|00001330| 0d 0a 09 7d 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |...}..}.|...funct|
|00001340| 69 6f 6e 20 41 75 74 6f | 49 6e 66 6f 28 55 42 72 |ion Auto|Info(UBr|
|00001350| 6f 77 73 65 72 53 65 72 | 76 65 72 4c 69 73 74 20 |owserSer|verList |
|00001360| 49 29 0d 0a 7b 0d 0a 09 | 69 66 28 52 6f 6f 74 2e |I)..{...|if(Root.|
|00001370| 57 69 6e 48 65 69 67 68 | 74 20 3e 3d 20 4d 69 6e |WinHeigh|t >= Min|
|00001380| 48 65 69 67 68 74 46 6f | 72 53 70 6c 69 74 74 65 |HeightFo|rSplitte|
|00001390| 72 20 7c 7c 20 49 6e 66 | 6f 57 69 6e 64 6f 77 2e |r || Inf|oWindow.|
|000013a0| 62 57 69 6e 64 6f 77 56 | 69 73 69 62 6c 65 29 0d |bWindowV|isible).|
|000013b0| 0a 09 09 53 68 6f 77 49 | 6e 66 6f 28 49 2c 20 54 |...ShowI|nfo(I, T|
|000013c0| 72 75 65 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |rue);..}|....func|
|000013d0| 74 69 6f 6e 20 53 68 6f | 77 49 6e 66 6f 28 55 42 |tion Sho|wInfo(UB|
|000013e0| 72 6f 77 73 65 72 53 65 | 72 76 65 72 4c 69 73 74 |rowserSe|rverList|
|000013f0| 20 49 2c 20 6f 70 74 69 | 6f 6e 61 6c 20 62 6f 6f | I, opti|onal boo|
|00001400| 6c 20 62 41 75 74 6f 49 | 6e 66 6f 29 0d 0a 7b 0d |l bAutoI|nfo)..{.|
|00001410| 0a 09 69 66 28 49 20 3d | 3d 20 4e 6f 6e 65 29 20 |..if(I =|= None) |
|00001420| 72 65 74 75 72 6e 3b 0d | 0a 09 53 68 6f 77 49 6e |return;.|..ShowIn|
|00001430| 66 6f 41 72 65 61 28 54 | 72 75 65 2c 20 52 6f 6f |foArea(T|rue, Roo|
|00001440| 74 2e 57 69 6e 48 65 69 | 67 68 74 20 3c 20 4d 69 |t.WinHei|ght < Mi|
|00001450| 6e 48 65 69 67 68 74 46 | 6f 72 53 70 6c 69 74 74 |nHeightF|orSplitt|
|00001460| 65 72 2c 20 62 41 75 74 | 6f 49 6e 66 6f 29 3b 0d |er, bAut|oInfo);.|
|00001470| 0a 0d 0a 09 49 6e 66 6f | 49 74 65 6d 20 3d 20 49 |....Info|Item = I|
|00001480| 3b 0d 0a 09 49 6e 66 6f | 43 6c 69 65 6e 74 2e 53 |;...Info|Client.S|
|00001490| 65 72 76 65 72 20 3d 20 | 49 6e 66 6f 49 74 65 6d |erver = |InfoItem|
|000014a0| 3b 0d 0a 09 49 6e 66 6f | 57 69 6e 64 6f 77 2e 57 |;...Info|Window.W|
|000014b0| 69 6e 64 6f 77 54 69 74 | 6c 65 20 3d 20 49 6e 66 |indowTit|le = Inf|
|000014c0| 6f 4e 61 6d 65 24 22 20 | 2d 20 22 24 49 6e 66 6f |oName$" |- "$Info|
|000014d0| 49 74 65 6d 2e 48 6f 73 | 74 4e 61 6d 65 3b 0d 0a |Item.Hos|tName;..|
|000014e0| 09 49 2e 53 65 72 76 65 | 72 53 74 61 74 75 73 28 |.I.Serve|rStatus(|
|000014f0| 29 3b 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |);..}...|.functio|
|00001500| 6e 20 52 65 73 6f 6c 75 | 74 69 6f 6e 43 68 61 6e |n Resolu|tionChan|
|00001510| 67 65 64 28 66 6c 6f 61 | 74 20 57 2c 20 66 6c 6f |ged(floa|t W, flo|
|00001520| 61 74 20 48 29 0d 0a 7b | 0d 0a 09 69 66 28 52 6f |at H)..{|...if(Ro|
|00001530| 6f 74 2e 57 69 6e 48 65 | 69 67 68 74 20 3e 3d 20 |ot.WinHe|ight >= |
|00001540| 4d 69 6e 48 65 69 67 68 | 74 46 6f 72 53 70 6c 69 |MinHeigh|tForSpli|
|00001550| 74 74 65 72 29 0d 0a 09 | 09 53 68 6f 77 49 6e 66 |tter)...|.ShowInf|
|00001560| 6f 41 72 65 61 28 54 72 | 75 65 2c 20 46 61 6c 73 |oArea(Tr|ue, Fals|
|00001570| 65 29 3b 0d 0a 09 65 6c | 73 65 0d 0a 09 09 53 68 |e);...el|se....Sh|
|00001580| 6f 77 49 6e 66 6f 41 72 | 65 61 28 46 61 6c 73 65 |owInfoAr|ea(False|
|00001590| 2c 20 54 72 75 65 29 3b | 0d 0a 09 0d 0a 09 69 66 |, True);|......if|
|000015a0| 28 49 6e 66 6f 57 69 6e | 64 6f 77 20 21 3d 20 4e |(InfoWin|dow != N|
|000015b0| 6f 6e 65 29 0d 0a 09 09 | 49 6e 66 6f 57 69 6e 64 |one)....|InfoWind|
|000015c0| 6f 77 2e 52 65 73 6f 6c | 75 74 69 6f 6e 43 68 61 |ow.Resol|utionCha|
|000015d0| 6e 67 65 64 28 57 2c 20 | 48 29 3b 0d 0a 0d 0a 09 |nged(W, |H);.....|
|000015e0| 53 75 70 65 72 2e 52 65 | 73 6f 6c 75 74 69 6f 6e |Super.Re|solution|
|000015f0| 43 68 61 6e 67 65 64 28 | 57 2c 20 48 29 3b 0d 0a |Changed(|W, H);..|
|00001600| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 52 65 |}....fun|ction Re|
|00001610| 73 69 7a 65 64 28 29 0d | 0a 7b 0d 0a 09 53 75 70 |sized().|.{...Sup|
|00001620| 65 72 2e 52 65 73 69 7a | 65 64 28 29 3b 0d 0a 09 |er.Resiz|ed();...|
|00001630| 69 66 28 56 53 70 6c 69 | 74 74 65 72 2e 62 57 69 |if(VSpli|tter.bWi|
|00001640| 6e 64 6f 77 56 69 73 69 | 62 6c 65 29 0d 0a 09 7b |ndowVisi|ble)...{|
|00001650| 0d 0a 09 09 56 53 70 6c | 69 74 74 65 72 2e 53 65 |....VSpl|itter.Se|
|00001660| 74 53 69 7a 65 28 57 69 | 6e 57 69 64 74 68 2c 20 |tSize(Wi|nWidth, |
|00001670| 57 69 6e 48 65 69 67 68 | 74 29 3b 0d 0a 09 09 56 |WinHeigh|t);....V|
|00001680| 53 70 6c 69 74 74 65 72 | 2e 4f 6c 64 57 69 6e 48 |Splitter|.OldWinH|
|00001690| 65 69 67 68 74 20 3d 20 | 56 53 70 6c 69 74 74 65 |eight = |VSplitte|
|000016a0| 72 2e 57 69 6e 48 65 69 | 67 68 74 3b 0d 0a 09 09 |r.WinHei|ght;....|
|000016b0| 56 53 70 6c 69 74 74 65 | 72 2e 53 70 6c 69 74 50 |VSplitte|r.SplitP|
|000016c0| 6f 73 20 3d 20 56 53 70 | 6c 69 74 74 65 72 2e 57 |os = VSp|litter.W|
|000016d0| 69 6e 48 65 69 67 68 74 | 20 2d 20 4d 69 6e 28 56 |inHeight| - Min(V|
|000016e0| 53 70 6c 69 74 74 65 72 | 2e 57 69 6e 48 65 69 67 |Splitter|.WinHeig|
|000016f0| 68 74 20 2f 20 32 2c 20 | 32 35 30 29 3b 0d 0a 09 |ht / 2, |250);...|
|00001700| 7d 0d 0a 09 65 6c 73 65 | 0d 0a 09 09 47 72 69 64 |}...else|....Grid|
|00001710| 2e 53 65 74 53 69 7a 65 | 28 57 69 6e 57 69 64 74 |.SetSize|(WinWidt|
|00001720| 68 2c 20 57 69 6e 48 65 | 69 67 68 74 29 3b 0d 0a |h, WinHe|ight);..|
|00001730| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 41 64 |}....fun|ction Ad|
|00001740| 64 53 75 62 73 65 74 28 | 55 42 72 6f 77 73 65 72 |dSubset(|UBrowser|
|00001750| 53 75 62 73 65 74 46 61 | 63 74 20 53 75 62 73 65 |SubsetFa|ct Subse|
|00001760| 74 29 0d 0a 7b 0d 0a 09 | 6c 6f 63 61 6c 20 55 42 |t)..{...|local UB|
|00001770| 72 6f 77 73 65 72 53 75 | 62 73 65 74 4c 69 73 74 |rowserSu|bsetList|
|00001780| 20 6c 3b 0d 0a 0d 0a 09 | 66 6f 72 28 6c 20 3d 20 | l;.....|for(l = |
|00001790| 55 42 72 6f 77 73 65 72 | 53 75 62 73 65 74 4c 69 |UBrowser|SubsetLi|
|000017a0| 73 74 28 53 75 62 73 65 | 74 4c 69 73 74 2e 4e 65 |st(Subse|tList.Ne|
|000017b0| 78 74 29 3b 20 6c 20 21 | 3d 20 4e 6f 6e 65 3b 20 |xt); l !|= None; |
|000017c0| 6c 20 3d 20 55 42 72 6f | 77 73 65 72 53 75 62 73 |l = UBro|wserSubs|
|000017d0| 65 74 4c 69 73 74 28 6c | 2e 4e 65 78 74 29 29 0d |etList(l|.Next)).|
|000017e0| 0a 09 09 69 66 28 6c 2e | 53 75 62 73 65 74 46 61 |...if(l.|SubsetFa|
|000017f0| 63 74 6f 72 79 20 3d 3d | 20 53 75 62 73 65 74 29 |ctory ==| Subset)|
|00001800| 0d 0a 09 09 09 72 65 74 | 75 72 6e 3b 0d 0a 09 0d |.....ret|urn;....|
|00001810| 0a 09 6c 20 3d 20 55 42 | 72 6f 77 73 65 72 53 75 |..l = UB|rowserSu|
|00001820| 62 73 65 74 4c 69 73 74 | 28 53 75 62 73 65 74 4c |bsetList|(SubsetL|
|00001830| 69 73 74 2e 41 70 70 65 | 6e 64 28 63 6c 61 73 73 |ist.Appe|nd(class|
|00001840| 27 55 42 72 6f 77 73 65 | 72 53 75 62 73 65 74 4c |'UBrowse|rSubsetL|
|00001850| 69 73 74 27 29 29 3b 0d | 0a 09 6c 2e 53 75 62 73 |ist'));.|..l.Subs|
|00001860| 65 74 46 61 63 74 6f 72 | 79 20 3d 20 53 75 62 73 |etFactor|y = Subs|
|00001870| 65 74 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |et;..}..|..functi|
|00001880| 6f 6e 20 41 64 64 53 75 | 70 65 72 53 65 74 28 55 |on AddSu|perSet(U|
|00001890| 42 72 6f 77 73 65 72 53 | 65 72 76 65 72 4c 69 73 |BrowserS|erverLis|
|000018a0| 74 57 69 6e 64 6f 77 20 | 53 75 70 65 72 73 65 74 |tWindow |Superset|
|000018b0| 29 0d 0a 7b 0d 0a 09 6c | 6f 63 61 6c 20 55 42 72 |)..{...l|ocal UBr|
|000018c0| 6f 77 73 65 72 53 75 70 | 65 72 73 65 74 4c 69 73 |owserSup|ersetLis|
|000018d0| 74 20 6c 3b 0d 0a 0d 0a | 09 66 6f 72 28 6c 20 3d |t l;....|.for(l =|
|000018e0| 20 55 42 72 6f 77 73 65 | 72 53 75 70 65 72 73 65 | UBrowse|rSuperse|
|000018f0| 74 4c 69 73 74 28 53 75 | 70 65 72 73 65 74 4c 69 |tList(Su|persetLi|
|00001900| 73 74 2e 4e 65 78 74 29 | 3b 20 6c 20 21 3d 20 4e |st.Next)|; l != N|
|00001910| 6f 6e 65 3b 20 6c 20 3d | 20 55 42 72 6f 77 73 65 |one; l =| UBrowse|
|00001920| 72 53 75 70 65 72 73 65 | 74 4c 69 73 74 28 6c 2e |rSuperse|tList(l.|
|00001930| 4e 65 78 74 29 29 0d 0a | 09 09 69 66 28 6c 2e 53 |Next))..|..if(l.S|
|00001940| 75 70 65 72 73 65 74 57 | 69 6e 64 6f 77 20 3d 3d |upersetW|indow ==|
|00001950| 20 53 75 70 65 72 73 65 | 74 29 0d 0a 09 09 09 72 | Superse|t).....r|
|00001960| 65 74 75 72 6e 3b 0d 0a | 09 0d 0a 09 6c 20 3d 20 |eturn;..|....l = |
|00001970| 55 42 72 6f 77 73 65 72 | 53 75 70 65 72 73 65 74 |UBrowser|Superset|
|00001980| 4c 69 73 74 28 53 75 70 | 65 72 73 65 74 4c 69 73 |List(Sup|ersetLis|
|00001990| 74 2e 41 70 70 65 6e 64 | 28 63 6c 61 73 73 27 55 |t.Append|(class'U|
|000019a0| 42 72 6f 77 73 65 72 53 | 75 70 65 72 73 65 74 4c |BrowserS|upersetL|
|000019b0| 69 73 74 27 29 29 3b 0d | 0a 09 6c 2e 53 75 70 65 |ist'));.|..l.Supe|
|000019c0| 72 73 65 74 57 69 6e 64 | 6f 77 20 3d 20 53 75 70 |rsetWind|ow = Sup|
|000019d0| 65 72 73 65 74 3b 0d 0a | 7d 0d 0a 0d 0a 66 75 6e |erset;..|}....fun|
|000019e0| 63 74 69 6f 6e 20 52 65 | 6d 6f 76 65 53 75 62 73 |ction Re|moveSubs|
|000019f0| 65 74 28 55 42 72 6f 77 | 73 65 72 53 75 62 73 65 |et(UBrow|serSubse|
|00001a00| 74 46 61 63 74 20 53 75 | 62 73 65 74 29 0d 0a 7b |tFact Su|bset)..{|
|00001a10| 0d 0a 09 6c 6f 63 61 6c | 20 55 42 72 6f 77 73 65 |...local| UBrowse|
|00001a20| 72 53 75 62 73 65 74 4c | 69 73 74 20 6c 3b 0d 0a |rSubsetL|ist l;..|
|00001a30| 0d 0a 09 66 6f 72 28 6c | 20 3d 20 55 42 72 6f 77 |...for(l| = UBrow|
|00001a40| 73 65 72 53 75 62 73 65 | 74 4c 69 73 74 28 53 75 |serSubse|tList(Su|
|00001a50| 62 73 65 74 4c 69 73 74 | 2e 4e 65 78 74 29 3b 20 |bsetList|.Next); |
|00001a60| 6c 20 21 3d 20 4e 6f 6e | 65 3b 20 6c 20 3d 20 55 |l != Non|e; l = U|
|00001a70| 42 72 6f 77 73 65 72 53 | 75 62 73 65 74 4c 69 73 |BrowserS|ubsetLis|
|00001a80| 74 28 6c 2e 4e 65 78 74 | 29 29 0d 0a 09 09 69 66 |t(l.Next|))....if|
|00001a90| 28 6c 2e 53 75 62 73 65 | 74 46 61 63 74 6f 72 79 |(l.Subse|tFactory|
|00001aa0| 20 3d 3d 20 53 75 62 73 | 65 74 29 0d 0a 09 09 09 | == Subs|et).....|
|00001ab0| 6c 2e 52 65 6d 6f 76 65 | 28 29 3b 0d 0a 7d 0d 0a |l.Remove|();..}..|
|00001ac0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 52 65 6d 6f 76 |..functi|on Remov|
|00001ad0| 65 53 75 70 65 72 73 65 | 74 28 55 42 72 6f 77 73 |eSuperse|t(UBrows|
|00001ae0| 65 72 53 65 72 76 65 72 | 4c 69 73 74 57 69 6e 64 |erServer|ListWind|
|00001af0| 6f 77 20 53 75 70 65 72 | 73 65 74 29 0d 0a 7b 0d |ow Super|set)..{.|
|00001b00| 0a 09 6c 6f 63 61 6c 20 | 55 42 72 6f 77 73 65 72 |..local |UBrowser|
|00001b10| 53 75 70 65 72 73 65 74 | 4c 69 73 74 20 6c 3b 0d |Superset|List l;.|
|00001b20| 0a 0d 0a 09 66 6f 72 28 | 6c 20 3d 20 55 42 72 6f |....for(|l = UBro|
|00001b30| 77 73 65 72 53 75 70 65 | 72 73 65 74 4c 69 73 74 |wserSupe|rsetList|
|00001b40| 28 53 75 70 65 72 73 65 | 74 4c 69 73 74 2e 4e 65 |(Superse|tList.Ne|
|00001b50| 78 74 29 3b 20 6c 20 21 | 3d 20 4e 6f 6e 65 3b 20 |xt); l !|= None; |
|00001b60| 6c 20 3d 20 55 42 72 6f | 77 73 65 72 53 75 70 65 |l = UBro|wserSupe|
|00001b70| 72 73 65 74 4c 69 73 74 | 28 6c 2e 4e 65 78 74 29 |rsetList|(l.Next)|
|00001b80| 29 0d 0a 09 09 69 66 28 | 6c 2e 53 75 70 65 72 73 |)....if(|l.Supers|
|00001b90| 65 74 57 69 6e 64 6f 77 | 20 3d 3d 20 53 75 70 65 |etWindow| == Supe|
|00001ba0| 72 73 65 74 29 0d 0a 09 | 09 09 6c 2e 52 65 6d 6f |rset)...|..l.Remo|
|00001bb0| 76 65 28 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |ve();..}|....func|
|00001bc0| 74 69 6f 6e 20 55 42 72 | 6f 77 73 65 72 53 65 72 |tion UBr|owserSer|
|00001bd0| 76 65 72 4c 69 73 74 20 | 41 64 64 46 61 76 6f 72 |verList |AddFavor|
|00001be0| 69 74 65 28 55 42 72 6f | 77 73 65 72 53 65 72 76 |ite(UBro|wserServ|
|00001bf0| 65 72 4c 69 73 74 20 53 | 65 72 76 65 72 29 0d 0a |erList S|erver)..|
|00001c00| 7b 0d 0a 09 72 65 74 75 | 72 6e 20 55 42 72 6f 77 |{...retu|rn UBrow|
|00001c10| 73 65 72 53 65 72 76 65 | 72 4c 69 73 74 57 69 6e |serServe|rListWin|
|00001c20| 64 6f 77 28 55 42 72 6f | 77 73 65 72 4d 61 69 6e |dow(UBro|wserMain|
|00001c30| 43 6c 69 65 6e 74 57 69 | 6e 64 6f 77 28 47 65 74 |ClientWi|ndow(Get|
|00001c40| 50 61 72 65 6e 74 28 63 | 6c 61 73 73 27 55 42 72 |Parent(c|lass'UBr|
|00001c50| 6f 77 73 65 72 4d 61 69 | 6e 43 6c 69 65 6e 74 57 |owserMai|nClientW|
|00001c60| 69 6e 64 6f 77 27 29 29 | 2e 46 61 76 6f 72 69 74 |indow'))|.Favorit|
|00001c70| 65 73 2e 50 61 67 65 29 | 2e 41 64 64 46 61 76 6f |es.Page)|.AddFavo|
|00001c80| 72 69 74 65 28 53 65 72 | 76 65 72 29 3b 0d 0a 7d |rite(Ser|ver);..}|
|00001c90| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 52 65 66 |....func|tion Ref|
|00001ca0| 72 65 73 68 28 6f 70 74 | 69 6f 6e 61 6c 20 62 6f |resh(opt|ional bo|
|00001cb0| 6f 6c 20 62 42 79 53 75 | 70 65 72 73 65 74 2c 20 |ol bBySu|perset, |
|00001cc0| 6f 70 74 69 6f 6e 61 6c | 20 62 6f 6f 6c 20 62 49 |optional| bool bI|
|00001cd0| 6e 69 74 69 61 6c 2c 20 | 6f 70 74 69 6f 6e 61 6c |nitial, |optional|
|00001ce0| 20 62 6f 6f 6c 20 62 53 | 61 76 65 45 78 69 73 74 | bool bS|aveExist|
|00001cf0| 69 6e 67 4c 69 73 74 2c | 20 6f 70 74 69 6f 6e 61 |ingList,| optiona|
|00001d00| 6c 20 62 6f 6f 6c 20 62 | 49 6e 4e 6f 53 6f 72 74 |l bool b|InNoSort|
|00001d10| 29 0d 0a 7b 0d 0a 09 62 | 48 61 64 49 6e 69 74 69 |)..{...b|HadIniti|
|00001d20| 61 6c 52 65 66 72 65 73 | 68 20 3d 20 54 72 75 65 |alRefres|h = True|
|00001d30| 3b 0d 0a 0d 0a 09 69 66 | 28 21 62 53 61 76 65 45 |;.....if|(!bSaveE|
|00001d40| 78 69 73 74 69 6e 67 4c | 69 73 74 29 0d 0a 09 7b |xistingL|ist)...{|
|00001d50| 0d 0a 09 09 49 6e 66 6f | 49 74 65 6d 20 3d 20 4e |....Info|Item = N|
|00001d60| 6f 6e 65 3b 0d 0a 09 09 | 49 6e 66 6f 43 6c 69 65 |one;....|InfoClie|
|00001d70| 6e 74 2e 53 65 72 76 65 | 72 20 3d 20 4e 6f 6e 65 |nt.Serve|r = None|
|00001d80| 3b 0d 0a 09 7d 0d 0a 0d | 0a 09 69 66 28 21 62 53 |;...}...|..if(!bS|
|00001d90| 61 76 65 45 78 69 73 74 | 69 6e 67 4c 69 73 74 20 |aveExist|ingList |
|00001da0| 26 26 20 50 69 6e 67 65 | 64 4c 69 73 74 20 21 3d |&& Pinge|dList !=|
|00001db0| 20 4e 6f 6e 65 29 0d 0a | 09 7b 0d 0a 09 09 50 69 | None)..|.{....Pi|
|00001dc0| 6e 67 65 64 4c 69 73 74 | 2e 44 65 73 74 72 6f 79 |ngedList|.Destroy|
|00001dd0| 4c 69 73 74 28 29 3b 0d | 0a 09 09 50 69 6e 67 65 |List();.|...Pinge|
|00001de0| 64 4c 69 73 74 20 3d 20 | 4e 6f 6e 65 3b 0d 0a 09 |dList = |None;...|
|00001df0| 09 47 72 69 64 2e 53 65 | 6c 65 63 74 65 64 53 65 |.Grid.Se|lectedSe|
|00001e00| 72 76 65 72 20 3d 20 4e | 6f 6e 65 3b 0d 0a 09 7d |rver = N|one;...}|
|00001e10| 0d 0a 0d 0a 09 69 66 28 | 50 69 6e 67 65 64 4c 69 |.....if(|PingedLi|
|00001e20| 73 74 20 3d 3d 20 4e 6f | 6e 65 29 0d 0a 09 7b 0d |st == No|ne)...{.|
|00001e30| 0a 09 09 50 69 6e 67 65 | 64 4c 69 73 74 3d 4e 65 |...Pinge|dList=Ne|
|00001e40| 77 20 53 65 72 76 65 72 | 4c 69 73 74 43 6c 61 73 |w Server|ListClas|
|00001e50| 73 3b 0d 0a 09 09 50 69 | 6e 67 65 64 4c 69 73 74 |s;....Pi|ngedList|
|00001e60| 2e 4f 77 6e 65 72 20 3d | 20 53 65 6c 66 3b 0d 0a |.Owner =| Self;..|
|00001e70| 09 09 50 69 6e 67 65 64 | 4c 69 73 74 2e 53 65 74 |..Pinged|List.Set|
|00001e80| 75 70 53 65 6e 74 69 6e | 65 6c 28 54 72 75 65 29 |upSentin|el(True)|
|00001e90| 3b 0d 0a 09 09 50 69 6e | 67 65 64 4c 69 73 74 2e |;....Pin|gedList.|
|00001ea0| 62 53 75 73 70 65 6e 64 | 61 62 6c 65 53 6f 72 74 |bSuspend|ableSort|
|00001eb0| 20 3d 20 54 72 75 65 3b | 0d 0a 09 7d 0d 0a 09 65 | = True;|...}...e|
|00001ec0| 6c 73 65 0d 0a 09 7b 0d | 0a 09 09 54 61 67 53 65 |lse...{.|...TagSe|
|00001ed0| 72 76 65 72 73 41 73 4f | 6c 64 28 29 3b 0d 0a 09 |rversAsO|ld();...|
|00001ee0| 7d 0d 0a 0d 0a 09 69 66 | 28 55 6e 70 69 6e 67 65 |}.....if|(Unpinge|
|00001ef0| 64 4c 69 73 74 20 21 3d | 20 4e 6f 6e 65 29 0d 0a |dList !=| None)..|
|00001f00| 09 09 55 6e 70 69 6e 67 | 65 64 4c 69 73 74 2e 44 |..Unping|edList.D|
|00001f10| 65 73 74 72 6f 79 4c 69 | 73 74 28 29 3b 0d 0a 09 |estroyLi|st();...|
|00001f20| 0d 0a 09 69 66 28 21 62 | 53 61 76 65 45 78 69 73 |...if(!b|SaveExis|
|00001f30| 74 69 6e 67 4c 69 73 74 | 29 0d 0a 09 7b 0d 0a 09 |tingList|)...{...|
|00001f40| 09 55 6e 70 69 6e 67 65 | 64 4c 69 73 74 20 3d 20 |.Unpinge|dList = |
|00001f50| 4e 65 77 20 53 65 72 76 | 65 72 4c 69 73 74 43 6c |New Serv|erListCl|
|00001f60| 61 73 73 3b 0d 0a 09 09 | 55 6e 70 69 6e 67 65 64 |ass;....|Unpinged|
|00001f70| 4c 69 73 74 2e 4f 77 6e | 65 72 20 3d 20 53 65 6c |List.Own|er = Sel|
|00001f80| 66 3b 0d 0a 09 09 55 6e | 70 69 6e 67 65 64 4c 69 |f;....Un|pingedLi|
|00001f90| 73 74 2e 53 65 74 75 70 | 53 65 6e 74 69 6e 65 6c |st.Setup|Sentinel|
|00001fa0| 28 46 61 6c 73 65 29 3b | 0d 0a 09 7d 0d 0a 0d 0a |(False);|...}....|
|00001fb0| 09 50 69 6e 67 53 74 61 | 74 65 20 3d 20 50 53 5f |.PingSta|te = PS_|
|00001fc0| 51 75 65 72 79 53 65 72 | 76 65 72 3b 0d 0a 09 53 |QuerySer|ver;...S|
|00001fd0| 68 75 74 64 6f 77 6e 46 | 61 63 74 6f 72 69 65 73 |hutdownF|actories|
|00001fe0| 28 62 42 79 53 75 70 65 | 72 73 65 74 29 3b 0d 0a |(bBySupe|rset);..|
|00001ff0| 09 43 72 65 61 74 65 46 | 61 63 74 6f 72 69 65 73 |.CreateF|actories|
|00002000| 28 62 53 61 76 65 45 78 | 69 73 74 69 6e 67 4c 69 |(bSaveEx|istingLi|
|00002010| 73 74 29 3b 0d 0a 09 51 | 75 65 72 79 28 62 42 79 |st);...Q|uery(bBy|
|00002020| 53 75 70 65 72 73 65 74 | 2c 20 62 49 6e 69 74 69 |Superset|, bIniti|
|00002030| 61 6c 2c 20 62 49 6e 4e | 6f 53 6f 72 74 29 3b 0d |al, bInN|oSort);.|
|00002040| 0a 0d 0a 09 69 66 28 21 | 62 49 6e 69 74 69 61 6c |....if(!|bInitial|
|00002050| 29 0d 0a 09 09 52 65 66 | 72 65 73 68 53 75 62 73 |)....Ref|reshSubs|
|00002060| 65 74 73 28 29 3b 0d 0a | 7d 0d 0a 0d 0a 66 75 6e |ets();..|}....fun|
|00002070| 63 74 69 6f 6e 20 54 61 | 67 53 65 72 76 65 72 73 |ction Ta|gServers|
|00002080| 41 73 4f 6c 64 28 29 0d | 0a 7b 0d 0a 09 6c 6f 63 |AsOld().|.{...loc|
|00002090| 61 6c 20 55 42 72 6f 77 | 73 65 72 53 65 72 76 65 |al UBrow|serServe|
|000020a0| 72 4c 69 73 74 20 6c 3b | 0d 0a 0d 0a 09 66 6f 72 |rList l;|.....for|
|000020b0| 28 6c 20 3d 20 55 42 72 | 6f 77 73 65 72 53 65 72 |(l = UBr|owserSer|
|000020c0| 76 65 72 4c 69 73 74 28 | 50 69 6e 67 65 64 4c 69 |verList(|PingedLi|
|000020d0| 73 74 2e 4e 65 78 74 29 | 3b 6c 20 21 3d 20 4e 6f |st.Next)|;l != No|
|000020e0| 6e 65 3b 6c 20 3d 20 55 | 42 72 6f 77 73 65 72 53 |ne;l = U|BrowserS|
|000020f0| 65 72 76 65 72 4c 69 73 | 74 28 6c 2e 4e 65 78 74 |erverLis|t(l.Next|
|00002100| 29 29 20 0d 0a 09 09 6c | 2e 62 4f 6c 64 53 65 72 |)) ....l|.bOldSer|
|00002110| 76 65 72 20 3d 20 54 72 | 75 65 3b 0d 0a 7d 0d 0a |ver = Tr|ue;..}..|
|00002120| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 52 65 6d 6f 76 |..functi|on Remov|
|00002130| 65 4f 6c 64 53 65 72 76 | 65 72 73 28 29 0d 0a 7b |eOldServ|ers()..{|
|00002140| 0d 0a 09 6c 6f 63 61 6c | 20 55 42 72 6f 77 73 65 |...local| UBrowse|
|00002150| 72 53 65 72 76 65 72 4c | 69 73 74 20 6c 2c 20 6e |rServerL|ist l, n|
|00002160| 3b 0d 0a 0d 0a 09 6c 20 | 3d 20 55 42 72 6f 77 73 |;.....l |= UBrows|
|00002170| 65 72 53 65 72 76 65 72 | 4c 69 73 74 28 50 69 6e |erServer|List(Pin|
|00002180| 67 65 64 4c 69 73 74 2e | 4e 65 78 74 29 3b 0d 0a |gedList.|Next);..|
|00002190| 09 77 68 69 6c 65 28 6c | 20 21 3d 20 4e 6f 6e 65 |.while(l| != None|
|000021a0| 29 20 0d 0a 09 7b 0d 0a | 09 09 6e 20 3d 20 55 42 |) ...{..|..n = UB|
|000021b0| 72 6f 77 73 65 72 53 65 | 72 76 65 72 4c 69 73 74 |rowserSe|rverList|
|000021c0| 28 6c 2e 4e 65 78 74 29 | 3b 0d 0a 0d 0a 09 09 69 |(l.Next)|;......i|
|000021d0| 66 28 6c 2e 62 4f 6c 64 | 53 65 72 76 65 72 29 0d |f(l.bOld|Server).|
|000021e0| 0a 09 09 7b 0d 0a 09 09 | 09 69 66 28 47 72 69 64 |...{....|.if(Grid|
|000021f0| 2e 53 65 6c 65 63 74 65 | 64 53 65 72 76 65 72 20 |.Selecte|dServer |
|00002200| 3d 3d 20 6c 29 0d 0a 09 | 09 09 09 47 72 69 64 2e |== l)...|...Grid.|
|00002210| 53 65 6c 65 63 74 65 64 | 53 65 72 76 65 72 20 3d |Selected|Server =|
|00002220| 20 6e 3b 0d 0a 0d 0a 09 | 09 09 6c 2e 52 65 6d 6f | n;.....|..l.Remo|
|00002230| 76 65 28 29 3b 0d 0a 09 | 09 7d 0d 0a 09 09 6c 20 |ve();...|.}....l |
|00002240| 3d 20 6e 3b 0d 0a 09 7d | 0d 0a 7d 0d 0a 0d 0a 66 |= n;...}|..}....f|
|00002250| 75 6e 63 74 69 6f 6e 20 | 52 65 66 72 65 73 68 53 |unction |RefreshS|
|00002260| 75 62 73 65 74 73 28 29 | 0d 0a 7b 0d 0a 09 6c 6f |ubsets()|..{...lo|
|00002270| 63 61 6c 20 55 42 72 6f | 77 73 65 72 53 75 62 73 |cal UBro|wserSubs|
|00002280| 65 74 4c 69 73 74 20 6c | 2c 20 4e 65 78 74 53 75 |etList l|, NextSu|
|00002290| 62 73 65 74 3b 0d 0a 0d | 0a 09 66 6f 72 28 6c 20 |bset;...|..for(l |
|000022a0| 3d 20 55 42 72 6f 77 73 | 65 72 53 75 62 73 65 74 |= UBrows|erSubset|
|000022b0| 4c 69 73 74 28 53 75 62 | 73 65 74 4c 69 73 74 2e |List(Sub|setList.|
|000022c0| 4e 65 78 74 29 3b 20 6c | 20 21 3d 20 4e 6f 6e 65 |Next); l| != None|
|000022d0| 3b 20 6c 20 3d 20 55 42 | 72 6f 77 73 65 72 53 75 |; l = UB|rowserSu|
|000022e0| 62 73 65 74 4c 69 73 74 | 28 6c 2e 4e 65 78 74 29 |bsetList|(l.Next)|
|000022f0| 29 0d 0a 09 09 6c 2e 62 | 4f 6c 64 45 6c 65 6d 65 |)....l.b|OldEleme|
|00002300| 6e 74 20 3d 20 54 72 75 | 65 3b 0d 0a 0d 0a 09 6c |nt = Tru|e;.....l|
|00002310| 20 3d 20 55 42 72 6f 77 | 73 65 72 53 75 62 73 65 | = UBrow|serSubse|
|00002320| 74 4c 69 73 74 28 53 75 | 62 73 65 74 4c 69 73 74 |tList(Su|bsetList|
|00002330| 2e 4e 65 78 74 29 3b 0d | 0a 09 77 68 69 6c 65 28 |.Next);.|..while(|
|00002340| 6c 20 21 3d 20 4e 6f 6e | 65 20 26 26 20 6c 2e 62 |l != Non|e && l.b|
|00002350| 4f 6c 64 45 6c 65 6d 65 | 6e 74 29 0d 0a 09 7b 0d |OldEleme|nt)...{.|
|00002360| 0a 09 09 4e 65 78 74 53 | 75 62 73 65 74 20 3d 20 |...NextS|ubset = |
|00002370| 55 42 72 6f 77 73 65 72 | 53 75 62 73 65 74 4c 69 |UBrowser|SubsetLi|
|00002380| 73 74 28 6c 2e 4e 65 78 | 74 29 3b 0d 0a 09 09 6c |st(l.Nex|t);....l|
|00002390| 2e 53 75 62 73 65 74 46 | 61 63 74 6f 72 79 2e 4f |.SubsetF|actory.O|
|000023a0| 77 6e 65 72 2e 4f 77 6e | 65 72 2e 52 65 66 72 65 |wner.Own|er.Refre|
|000023b0| 73 68 28 54 72 75 65 29 | 3b 0d 0a 09 09 6c 20 3d |sh(True)|;....l =|
|000023c0| 20 4e 65 78 74 53 75 62 | 73 65 74 3b 0d 0a 09 7d | NextSub|set;...}|
|000023d0| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000023e0| 52 65 50 69 6e 67 28 29 | 0d 0a 7b 0d 0a 09 50 69 |RePing()|..{...Pi|
|000023f0| 6e 67 53 74 61 74 65 20 | 3d 20 50 53 5f 52 65 50 |ngState |= PS_ReP|
|00002400| 69 6e 67 69 6e 67 3b 0d | 0a 09 50 69 6e 67 65 64 |inging;.|..Pinged|
|00002410| 4c 69 73 74 2e 49 6e 76 | 61 6c 69 64 61 74 65 50 |List.Inv|alidateP|
|00002420| 69 6e 67 73 28 29 3b 0d | 0a 09 50 69 6e 67 65 64 |ings();.|..Pinged|
|00002430| 4c 69 73 74 2e 50 69 6e | 67 53 65 72 76 65 72 73 |List.Pin|gServers|
|00002440| 28 54 72 75 65 2c 20 46 | 61 6c 73 65 29 3b 0d 0a |(True, F|alse);..|
|00002450| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 51 75 |}....fun|ction Qu|
|00002460| 65 72 79 46 69 6e 69 73 | 68 65 64 28 55 42 72 6f |eryFinis|hed(UBro|
|00002470| 77 73 65 72 53 65 72 76 | 65 72 4c 69 73 74 46 61 |wserServ|erListFa|
|00002480| 63 74 6f 72 79 20 46 61 | 63 74 2c 20 62 6f 6f 6c |ctory Fa|ct, bool|
|00002490| 20 62 53 75 63 63 65 73 | 73 2c 20 6f 70 74 69 6f | bSucces|s, optio|
|000024a0| 6e 61 6c 20 73 74 72 69 | 6e 67 20 45 72 72 6f 72 |nal stri|ng Error|
|000024b0| 4d 73 67 29 0d 0a 7b 0d | 0a 09 6c 6f 63 61 6c 20 |Msg)..{.|..local |
|000024c0| 69 6e 74 20 69 3b 0d 0a | 09 6c 6f 63 61 6c 20 62 |int i;..|.local b|
|000024d0| 6f 6f 6c 20 62 44 6f 6e | 65 3b 0d 0a 0d 0a 09 62 |ool bDon|e;.....b|
|000024e0| 44 6f 6e 65 20 3d 20 54 | 72 75 65 3b 0d 0a 09 66 |Done = T|rue;...f|
|000024f0| 6f 72 28 69 3d 30 3b 69 | 3c 31 30 3b 69 2b 2b 29 |or(i=0;i|<10;i++)|
|00002500| 0d 0a 09 7b 0d 0a 09 09 | 69 66 28 46 61 63 74 6f |...{....|if(Facto|
|00002510| 72 69 65 73 5b 69 5d 20 | 21 3d 20 4e 6f 6e 65 29 |ries[i] |!= None)|
|00002520| 0d 0a 09 09 7b 0d 0a 09 | 09 09 69 66 28 46 61 63 |....{...|..if(Fac|
|00002530| 74 6f 72 69 65 73 5b 69 | 5d 20 3d 3d 20 46 61 63 |tories[i|] == Fac|
|00002540| 74 29 0d 0a 09 09 09 09 | 51 75 65 72 79 44 6f 6e |t)......|QueryDon|
|00002550| 65 5b 69 5d 20 3d 20 31 | 3b 0d 0a 09 09 09 69 66 |e[i] = 1|;.....if|
|00002560| 28 51 75 65 72 79 44 6f | 6e 65 5b 69 5d 20 3d 3d |(QueryDo|ne[i] ==|
|00002570| 20 30 29 0d 0a 09 09 09 | 09 62 44 6f 6e 65 20 3d | 0).....|.bDone =|
|00002580| 20 46 61 6c 73 65 3b 0d | 0a 09 09 7d 0d 0a 09 7d | False;.|...}...}|
|00002590| 0d 0a 0d 0a 09 69 66 28 | 21 62 53 75 63 63 65 73 |.....if(|!bSucces|
|000025a0| 73 29 0d 0a 09 7b 0d 0a | 09 09 50 69 6e 67 53 74 |s)...{..|..PingSt|
|000025b0| 61 74 65 20 3d 20 50 53 | 5f 51 75 65 72 79 46 61 |ate = PS|_QueryFa|
|000025c0| 69 6c 65 64 3b 0d 0a 09 | 09 45 72 72 6f 72 53 74 |iled;...|.ErrorSt|
|000025d0| 72 69 6e 67 20 3d 20 45 | 72 72 6f 72 4d 73 67 3b |ring = E|rrorMsg;|
|000025e0| 0d 0a 0d 0a 09 09 2f 2f | 20 64 6f 6e 27 74 20 70 |......//| don't p|
|000025f0| 69 6e 67 20 61 6e 64 20 | 72 65 70 6f 72 74 20 73 |ing and |report s|
|00002600| 75 63 63 65 73 73 20 69 | 66 20 77 65 20 68 61 76 |uccess i|f we hav|
|00002610| 65 20 6e 6f 20 73 65 72 | 76 65 72 73 2e 0d 0a 09 |e no ser|vers....|
|00002620| 09 69 66 28 62 44 6f 6e | 65 20 26 26 20 55 6e 70 |.if(bDon|e && Unp|
|00002630| 69 6e 67 65 64 4c 69 73 | 74 2e 43 6f 75 6e 74 28 |ingedLis|t.Count(|
|00002640| 29 20 3d 3d 20 30 29 0d | 0a 09 09 7b 0d 0a 09 09 |) == 0).|...{....|
|00002650| 09 69 66 28 20 62 46 61 | 6c 6c 62 61 63 6b 46 61 |.if( bFa|llbackFa|
|00002660| 63 74 6f 72 69 65 73 20 | 29 0d 0a 09 09 09 7b 0d |ctories |).....{.|
|00002670| 0a 09 09 09 09 46 61 6c | 6c 62 61 63 6b 46 61 63 |.....Fal|lbackFac|
|00002680| 74 6f 72 79 2b 2b 3b 0d | 0a 09 09 09 09 69 66 28 |tory++;.|.....if(|
|00002690| 20 4c 69 73 74 46 61 63 | 74 6f 72 69 65 73 5b 46 | ListFac|tories[F|
|000026a0| 61 6c 6c 62 61 63 6b 46 | 61 63 74 6f 72 79 5d 20 |allbackF|actory] |
|000026b0| 21 3d 20 22 22 20 29 0d | 0a 09 09 09 09 09 52 65 |!= "" ).|......Re|
|000026c0| 66 72 65 73 68 28 29 3b | 09 2f 2f 20 74 72 79 20 |fresh();|.// try |
|000026d0| 74 68 65 20 6e 65 78 74 | 20 66 61 6c 6c 62 61 63 |the next| fallbac|
|000026e0| 6b 20 6d 61 73 74 65 72 | 20 73 65 72 76 65 72 0d |k master| server.|
|000026f0| 0a 09 09 09 09 65 6c 73 | 65 0d 0a 09 09 09 09 09 |.....els|e.......|
|00002700| 46 61 6c 6c 62 61 63 6b | 46 61 63 74 6f 72 79 20 |Fallback|Factory |
|00002710| 3d 20 30 3b 0d 0a 09 09 | 09 7d 0d 0a 09 09 09 72 |= 0;....|.}.....r|
|00002720| 65 74 75 72 6e 3b 0d 0a | 09 09 7d 0d 0a 09 7d 0d |eturn;..|..}...}.|
|00002730| 0a 09 65 6c 73 65 0d 0a | 09 09 45 72 72 6f 72 53 |..else..|..ErrorS|
|00002740| 74 72 69 6e 67 20 3d 20 | 22 22 3b 0d 0a 0d 0a 09 |tring = |"";.....|
|00002750| 69 66 28 62 44 6f 6e 65 | 29 0d 0a 09 7b 0d 0a 09 |if(bDone|)...{...|
|00002760| 09 52 65 6d 6f 76 65 4f | 6c 64 53 65 72 76 65 72 |.RemoveO|ldServer|
|00002770| 73 28 29 3b 0d 0a 0d 0a | 09 09 50 69 6e 67 53 74 |s();....|..PingSt|
|00002780| 61 74 65 20 3d 20 50 53 | 5f 50 69 6e 67 69 6e 67 |ate = PS|_Pinging|
|00002790| 3b 0d 0a 09 09 69 66 28 | 21 62 4e 6f 53 6f 72 74 |;....if(|!bNoSort|
|000027a0| 20 26 26 20 21 46 61 63 | 74 2e 62 49 6e 63 72 65 | && !Fac|t.bIncre|
|000027b0| 6d 65 6e 74 61 6c 50 69 | 6e 67 29 0d 0a 09 09 09 |mentalPi|ng).....|
|000027c0| 50 69 6e 67 65 64 4c 69 | 73 74 2e 53 6f 72 74 28 |PingedLi|st.Sort(|
|000027d0| 29 3b 0d 0a 09 09 55 6e | 70 69 6e 67 65 64 4c 69 |);....Un|pingedLi|
|000027e0| 73 74 2e 50 69 6e 67 53 | 65 72 76 65 72 73 28 54 |st.PingS|ervers(T|
|000027f0| 72 75 65 2c 20 62 4e 6f | 53 6f 72 74 20 7c 7c 20 |rue, bNo|Sort || |
|00002800| 46 61 63 74 2e 62 49 6e | 63 72 65 6d 65 6e 74 61 |Fact.bIn|crementa|
|00002810| 6c 50 69 6e 67 29 3b 0d | 0a 09 7d 0d 0a 7d 0d 0a |lPing);.|..}..}..|
|00002820| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 50 69 6e 67 46 |..functi|on PingF|
|00002830| 69 6e 69 73 68 65 64 28 | 29 0d 0a 7b 0d 0a 09 50 |inished(|)..{...P|
|00002840| 69 6e 67 53 74 61 74 65 | 20 3d 20 50 53 5f 44 6f |ingState| = PS_Do|
|00002850| 6e 65 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |ne;..}..|..functi|
|00002860| 6f 6e 20 43 72 65 61 74 | 65 46 61 63 74 6f 72 69 |on Creat|eFactori|
|00002870| 65 73 28 62 6f 6f 6c 20 | 62 55 73 65 50 69 6e 67 |es(bool |bUsePing|
|00002880| 65 64 4c 69 73 74 29 0d | 0a 7b 0d 0a 09 6c 6f 63 |edList).|.{...loc|
|00002890| 61 6c 20 69 6e 74 20 69 | 3b 0d 0a 0d 0a 09 66 6f |al int i|;.....fo|
|000028a0| 72 28 69 3d 30 3b 69 3c | 31 30 3b 69 2b 2b 29 0d |r(i=0;i<|10;i++).|
|000028b0| 0a 09 7b 0d 0a 09 09 69 | 66 28 4c 69 73 74 46 61 |..{....i|f(ListFa|
|000028c0| 63 74 6f 72 69 65 73 5b | 69 5d 20 3d 3d 20 22 22 |ctories[|i] == ""|
|000028d0| 29 0d 0a 09 09 09 62 72 | 65 61 6b 3b 0d 0a 09 09 |).....br|eak;....|
|000028e0| 69 66 28 21 62 46 61 6c | 6c 62 61 63 6b 46 61 63 |if(!bFal|lbackFac|
|000028f0| 74 6f 72 69 65 73 20 7c | 7c 20 46 61 6c 6c 62 61 |tories ||| Fallba|
|00002900| 63 6b 46 61 63 74 6f 72 | 79 20 3d 3d 20 69 29 0d |ckFactor|y == i).|
|00002910| 0a 09 09 7b 0d 0a 09 09 | 09 46 61 63 74 6f 72 69 |...{....|.Factori|
|00002920| 65 73 5b 69 5d 20 3d 20 | 55 42 72 6f 77 73 65 72 |es[i] = |UBrowser|
|00002930| 53 65 72 76 65 72 4c 69 | 73 74 46 61 63 74 6f 72 |ServerLi|stFactor|
|00002940| 79 28 42 75 69 6c 64 4f | 62 6a 65 63 74 57 69 74 |y(BuildO|bjectWit|
|00002950| 68 50 72 6f 70 65 72 74 | 69 65 73 28 4c 69 73 74 |hPropert|ies(List|
|00002960| 46 61 63 74 6f 72 69 65 | 73 5b 69 5d 29 29 3b 0d |Factorie|s[i]));.|
|00002970| 0a 09 09 09 0d 0a 09 09 | 09 46 61 63 74 6f 72 69 |........|.Factori|
|00002980| 65 73 5b 69 5d 2e 50 69 | 6e 67 65 64 4c 69 73 74 |es[i].Pi|ngedList|
|00002990| 20 3d 20 50 69 6e 67 65 | 64 4c 69 73 74 3b 0d 0a | = Pinge|dList;..|
|000029a0| 09 09 09 46 61 63 74 6f | 72 69 65 73 5b 69 5d 2e |...Facto|ries[i].|
|000029b0| 55 6e 70 69 6e 67 65 64 | 4c 69 73 74 20 3d 20 55 |Unpinged|List = U|
|000029c0| 6e 70 69 6e 67 65 64 4c | 69 73 74 3b 0d 0a 09 09 |npingedL|ist;....|
|000029d0| 0d 0a 09 09 09 69 66 28 | 62 55 73 65 50 69 6e 67 |.....if(|bUsePing|
|000029e0| 65 64 4c 69 73 74 29 0d | 0a 09 09 09 09 46 61 63 |edList).|.....Fac|
|000029f0| 74 6f 72 69 65 73 5b 69 | 5d 2e 4f 77 6e 65 72 20 |tories[i|].Owner |
|00002a00| 3d 20 50 69 6e 67 65 64 | 4c 69 73 74 3b 0d 0a 09 |= Pinged|List;...|
|00002a10| 09 09 65 6c 73 65 0d 0a | 09 09 09 09 46 61 63 74 |..else..|....Fact|
|00002a20| 6f 72 69 65 73 5b 69 5d | 2e 4f 77 6e 65 72 20 3d |ories[i]|.Owner =|
|00002a30| 20 55 6e 70 69 6e 67 65 | 64 4c 69 73 74 3b 0d 0a | Unpinge|dList;..|
|00002a40| 09 09 7d 0d 0a 09 09 51 | 75 65 72 79 44 6f 6e 65 |..}....Q|ueryDone|
|00002a50| 5b 69 5d 20 3d 20 30 3b | 0d 0a 09 7d 09 0d 0a 7d |[i] = 0;|...}...}|
|00002a60| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 53 68 75 |....func|tion Shu|
|00002a70| 74 64 6f 77 6e 46 61 63 | 74 6f 72 69 65 73 28 6f |tdownFac|tories(o|
|00002a80| 70 74 69 6f 6e 61 6c 20 | 62 6f 6f 6c 20 62 42 79 |ptional |bool bBy|
|00002a90| 53 75 70 65 72 73 65 74 | 29 0d 0a 7b 0d 0a 09 6c |Superset|)..{...l|
|00002aa0| 6f 63 61 6c 20 69 6e 74 | 20 69 3b 0d 0a 0d 0a 09 |ocal int| i;.....|
|00002ab0| 66 6f 72 28 69 3d 30 3b | 69 3c 31 30 3b 69 2b 2b |for(i=0;|i<10;i++|
|00002ac0| 29 0d 0a 09 7b 0d 0a 09 | 09 69 66 28 46 61 63 74 |)...{...|.if(Fact|
|00002ad0| 6f 72 69 65 73 5b 69 5d | 20 21 3d 20 4e 6f 6e 65 |ories[i]| != None|
|00002ae0| 29 20 0d 0a 09 09 7b 0d | 0a 09 09 09 46 61 63 74 |) ....{.|....Fact|
|00002af0| 6f 72 69 65 73 5b 69 5d | 2e 53 68 75 74 64 6f 77 |ories[i]|.Shutdow|
|00002b00| 6e 28 62 42 79 53 75 70 | 65 72 73 65 74 29 3b 0d |n(bBySup|erset);.|
|00002b10| 0a 09 09 09 46 61 63 74 | 6f 72 69 65 73 5b 69 5d |....Fact|ories[i]|
|00002b20| 20 3d 20 4e 6f 6e 65 3b | 0d 0a 09 09 7d 0d 0a 09 | = None;|....}...|
|00002b30| 7d 09 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |}...}...|.functio|
|00002b40| 6e 20 51 75 65 72 79 28 | 6f 70 74 69 6f 6e 61 6c |n Query(|optional|
|00002b50| 20 62 6f 6f 6c 20 62 42 | 79 53 75 70 65 72 73 65 | bool bB|ySuperse|
|00002b60| 74 2c 20 6f 70 74 69 6f | 6e 61 6c 20 62 6f 6f 6c |t, optio|nal bool|
|00002b70| 20 62 49 6e 69 74 69 61 | 6c 2c 20 6f 70 74 69 6f | bInitia|l, optio|
|00002b80| 6e 61 6c 20 62 6f 6f 6c | 20 62 49 6e 4e 6f 53 6f |nal bool| bInNoSo|
|00002b90| 72 74 29 0d 0a 7b 0d 0a | 09 6c 6f 63 61 6c 20 69 |rt)..{..|.local i|
|00002ba0| 6e 74 20 69 3b 0d 0a 0d | 0a 09 62 4e 6f 53 6f 72 |nt i;...|..bNoSor|
|00002bb0| 74 20 3d 20 62 49 6e 4e | 6f 53 6f 72 74 3b 0d 0a |t = bInN|oSort;..|
|00002bc0| 0d 0a 09 2f 2f 20 51 75 | 65 72 79 20 61 6c 6c 20 |...// Qu|ery all |
|00002bd0| 6f 75 72 20 66 61 63 74 | 6f 72 69 65 73 0d 0a 09 |our fact|ories...|
|00002be0| 66 6f 72 28 69 3d 30 3b | 69 3c 31 30 3b 69 2b 2b |for(i=0;|i<10;i++|
|00002bf0| 29 0d 0a 09 7b 0d 0a 09 | 09 69 66 28 46 61 63 74 |)...{...|.if(Fact|
|00002c00| 6f 72 69 65 73 5b 69 5d | 20 21 3d 20 4e 6f 6e 65 |ories[i]| != None|
|00002c10| 29 0d 0a 09 09 09 46 61 | 63 74 6f 72 69 65 73 5b |).....Fa|ctories[|
|00002c20| 69 5d 2e 51 75 65 72 79 | 28 62 42 79 53 75 70 65 |i].Query|(bBySupe|
|00002c30| 72 73 65 74 2c 20 62 49 | 6e 69 74 69 61 6c 29 3b |rset, bI|nitial);|
|00002c40| 0d 0a 09 7d 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |...}..}.|...funct|
|00002c50| 69 6f 6e 20 50 61 69 6e | 74 28 43 61 6e 76 61 73 |ion Pain|t(Canvas|
|00002c60| 20 43 2c 20 66 6c 6f 61 | 74 20 58 2c 20 66 6c 6f | C, floa|t X, flo|
|00002c70| 61 74 20 59 29 0d 0a 7b | 0d 0a 09 44 72 61 77 53 |at Y)..{|...DrawS|
|00002c80| 74 72 65 74 63 68 65 64 | 54 65 78 74 75 72 65 28 |tretched|Texture(|
|00002c90| 43 2c 20 30 2c 20 30 2c | 20 57 69 6e 57 69 64 74 |C, 0, 0,| WinWidt|
|00002ca0| 68 2c 20 57 69 6e 48 65 | 69 67 68 74 2c 20 54 65 |h, WinHe|ight, Te|
|00002cb0| 78 74 75 72 65 27 42 6c | 61 63 6b 54 65 78 74 75 |xture'Bl|ackTextu|
|00002cc0| 72 65 27 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |re');..}|....func|
|00002cd0| 74 69 6f 6e 20 54 69 63 | 6b 28 66 6c 6f 61 74 20 |tion Tic|k(float |
|00002ce0| 44 65 6c 74 61 29 0d 0a | 7b 0d 0a 09 50 69 6e 67 |Delta)..|{...Ping|
|00002cf0| 65 64 4c 69 73 74 2e 54 | 69 63 6b 28 44 65 6c 74 |edList.T|ick(Delt|
|00002d00| 61 29 3b 0d 0a 0d 0a 09 | 69 66 28 50 69 6e 67 65 |a);.....|if(Pinge|
|00002d10| 64 4c 69 73 74 2e 62 4e | 65 65 64 55 70 64 61 74 |dList.bN|eedUpdat|
|00002d20| 65 43 6f 75 6e 74 29 0d | 0a 09 7b 0d 0a 09 09 50 |eCount).|..{....P|
|00002d30| 69 6e 67 65 64 4c 69 73 | 74 2e 55 70 64 61 74 65 |ingedLis|t.Update|
|00002d40| 53 65 72 76 65 72 43 6f | 75 6e 74 28 29 3b 0d 0a |ServerCo|unt();..|
|00002d50| 09 09 50 69 6e 67 65 64 | 4c 69 73 74 2e 62 4e 65 |..Pinged|List.bNe|
|00002d60| 65 64 55 70 64 61 74 65 | 43 6f 75 6e 74 20 3d 20 |edUpdate|Count = |
|00002d70| 46 61 6c 73 65 3b 0d 0a | 09 7d 0d 0a 0d 0a 09 2f |False;..|.}...../|
|00002d80| 2f 20 41 75 74 6f 52 65 | 66 72 65 73 68 20 6c 6f |/ AutoRe|fresh lo|
|00002d90| 63 61 6c 20 73 65 72 76 | 65 72 73 0d 0a 09 69 66 |cal serv|ers...if|
|00002da0| 28 41 75 74 6f 52 65 66 | 72 65 73 68 54 69 6d 65 |(AutoRef|reshTime|
|00002db0| 20 3e 20 30 29 0d 0a 09 | 7b 0d 0a 09 09 54 69 6d | > 0)...|{....Tim|
|00002dc0| 65 45 6c 61 70 73 65 64 | 20 2b 3d 20 44 65 6c 74 |eElapsed| += Delt|
|00002dd0| 61 3b 0d 0a 09 09 0d 0a | 09 09 69 66 28 54 69 6d |a;......|..if(Tim|
|00002de0| 65 45 6c 61 70 73 65 64 | 20 3e 20 41 75 74 6f 52 |eElapsed| > AutoR|
|00002df0| 65 66 72 65 73 68 54 69 | 6d 65 29 0d 0a 09 09 7b |efreshTi|me)....{|
|00002e00| 0d 0a 09 09 09 54 69 6d | 65 45 6c 61 70 73 65 64 |.....Tim|eElapsed|
|00002e10| 20 3d 20 30 3b 0d 0a 09 | 09 09 52 65 66 72 65 73 | = 0;...|..Refres|
|00002e20| 68 28 2c 2c 54 72 75 65 | 2c 20 62 4e 6f 41 75 74 |h(,,True|, bNoAut|
|00002e30| 6f 53 6f 72 74 29 3b 0d | 0a 09 09 7d 0d 0a 09 7d |oSort);.|...}...}|
|00002e40| 09 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |...}....|function|
|00002e50| 20 42 65 66 6f 72 65 50 | 61 69 6e 74 28 43 61 6e | BeforeP|aint(Can|
|00002e60| 76 61 73 20 43 2c 20 66 | 6c 6f 61 74 20 58 2c 20 |vas C, f|loat X, |
|00002e70| 66 6c 6f 61 74 20 59 29 | 0d 0a 7b 0d 0a 09 6c 6f |float Y)|..{...lo|
|00002e80| 63 61 6c 20 55 42 72 6f | 77 73 65 72 4d 61 69 6e |cal UBro|wserMain|
|00002e90| 57 69 6e 64 6f 77 20 57 | 3b 0d 0a 09 6c 6f 63 61 |Window W|;...loca|
|00002ea0| 6c 20 55 42 72 6f 77 73 | 65 72 53 75 70 65 72 73 |l UBrows|erSupers|
|00002eb0| 65 74 4c 69 73 74 20 6c | 3b 0d 0a 09 6c 6f 63 61 |etList l|;...loca|
|00002ec0| 6c 20 45 50 69 6e 67 53 | 74 61 74 65 20 50 3b 0d |l EPingS|tate P;.|
|00002ed0| 0a 09 6c 6f 63 61 6c 20 | 69 6e 74 20 50 65 72 63 |..local |int Perc|
|00002ee0| 65 6e 74 43 6f 6d 70 6c | 65 74 65 3b 0d 0a 09 6c |entCompl|ete;...l|
|00002ef0| 6f 63 61 6c 20 69 6e 74 | 20 54 6f 74 61 6c 52 65 |ocal int| TotalRe|
|00002f00| 74 75 72 6e 65 64 53 65 | 72 76 65 72 73 3b 0d 0a |turnedSe|rvers;..|
|00002f10| 09 6c 6f 63 61 6c 20 73 | 74 72 69 6e 67 20 45 3b |.local s|tring E;|
|00002f20| 0d 0a 09 6c 6f 63 61 6c | 20 69 6e 74 20 54 6f 74 |...local| int Tot|
|00002f30| 61 6c 53 65 72 76 65 72 | 73 3b 0d 0a 09 6c 6f 63 |alServer|s;...loc|
|00002f40| 61 6c 20 69 6e 74 20 50 | 69 6e 67 65 64 53 65 72 |al int P|ingedSer|
|00002f50| 76 65 72 73 3b 0d 0a 09 | 6c 6f 63 61 6c 20 69 6e |vers;...|local in|
|00002f60| 74 20 4d 79 53 65 72 76 | 65 72 73 3b 0d 0a 0d 0a |t MyServ|ers;....|
|00002f70| 09 53 75 70 65 72 2e 42 | 65 66 6f 72 65 50 61 69 |.Super.B|eforePai|
|00002f80| 6e 74 28 43 2c 20 58 2c | 20 59 29 3b 0d 0a 0d 0a |nt(C, X,| Y);....|
|00002f90| 09 57 20 3d 20 55 42 72 | 6f 77 73 65 72 4d 61 69 |.W = UBr|owserMai|
|00002fa0| 6e 57 69 6e 64 6f 77 28 | 47 65 74 50 61 72 65 6e |nWindow(|GetParen|
|00002fb0| 74 28 63 6c 61 73 73 27 | 55 42 72 6f 77 73 65 72 |t(class'|UBrowser|
|00002fc0| 4d 61 69 6e 57 69 6e 64 | 6f 77 27 29 29 3b 0d 0a |MainWind|ow'));..|
|00002fd0| 09 6c 20 3d 20 55 42 72 | 6f 77 73 65 72 53 75 70 |.l = UBr|owserSup|
|00002fe0| 65 72 73 65 74 4c 69 73 | 74 28 53 75 70 65 72 73 |ersetLis|t(Supers|
|00002ff0| 65 74 4c 69 73 74 2e 4e | 65 78 74 29 3b 0d 0a 0d |etList.N|ext);...|
|00003000| 0a 09 69 66 28 6c 20 21 | 3d 20 4e 6f 6e 65 20 26 |..if(l !|= None &|
|00003010| 26 20 50 69 6e 67 53 74 | 61 74 65 20 21 3d 20 50 |& PingSt|ate != P|
|00003020| 53 5f 52 65 50 69 6e 67 | 69 6e 67 29 0d 0a 09 7b |S_RePing|ing)...{|
|00003030| 0d 0a 09 09 50 20 3d 20 | 6c 2e 53 75 70 65 72 73 |....P = |l.Supers|
|00003040| 65 74 57 69 6e 64 6f 77 | 2e 50 69 6e 67 53 74 61 |etWindow|.PingSta|
|00003050| 74 65 3b 0d 0a 09 09 50 | 69 6e 67 53 74 61 74 65 |te;....P|ingState|
|00003060| 20 3d 20 50 3b 0d 0a 0d | 0a 09 09 69 66 28 50 20 | = P;...|...if(P |
|00003070| 3d 3d 20 50 53 5f 51 75 | 65 72 79 53 65 72 76 65 |== PS_Qu|eryServe|
|00003080| 72 29 0d 0a 09 09 09 54 | 6f 74 61 6c 52 65 74 75 |r).....T|otalRetu|
|00003090| 72 6e 65 64 53 65 72 76 | 65 72 73 20 3d 20 6c 2e |rnedServ|ers = l.|
|000030a0| 53 75 70 65 72 73 65 74 | 57 69 6e 64 6f 77 2e 55 |Superset|Window.U|
|000030b0| 6e 70 69 6e 67 65 64 4c | 69 73 74 2e 43 6f 75 6e |npingedL|ist.Coun|
|000030c0| 74 28 29 3b 0d 0a 0d 0a | 09 09 50 69 6e 67 65 64 |t();....|..Pinged|
|000030d0| 53 65 72 76 65 72 73 20 | 3d 20 6c 2e 53 75 70 65 |Servers |= l.Supe|
|000030e0| 72 73 65 74 57 69 6e 64 | 6f 77 2e 50 69 6e 67 65 |rsetWind|ow.Pinge|
|000030f0| 64 4c 69 73 74 2e 43 6f | 75 6e 74 28 29 3b 0d 0a |dList.Co|unt();..|
|00003100| 09 09 54 6f 74 61 6c 53 | 65 72 76 65 72 73 20 3d |..TotalS|ervers =|
|00003110| 20 6c 2e 53 75 70 65 72 | 73 65 74 57 69 6e 64 6f | l.Super|setWindo|
|00003120| 77 2e 55 6e 70 69 6e 67 | 65 64 4c 69 73 74 2e 43 |w.Unping|edList.C|
|00003130| 6f 75 6e 74 28 29 20 2b | 20 50 69 6e 67 65 64 53 |ount() +| PingedS|
|00003140| 65 72 76 65 72 73 3b 0d | 0a 09 09 4d 79 53 65 72 |ervers;.|...MySer|
|00003150| 76 65 72 73 20 3d 20 50 | 69 6e 67 65 64 4c 69 73 |vers = P|ingedLis|
|00003160| 74 2e 43 6f 75 6e 74 28 | 29 3b 0d 0a 09 0d 0a 09 |t.Count(|);......|
|00003170| 09 45 20 3d 20 6c 2e 53 | 75 70 65 72 73 65 74 57 |.E = l.S|upersetW|
|00003180| 69 6e 64 6f 77 2e 45 72 | 72 6f 72 53 74 72 69 6e |indow.Er|rorStrin|
|00003190| 67 3b 0d 0a 09 7d 0d 0a | 09 65 6c 73 65 0d 0a 09 |g;...}..|.else...|
|000031a0| 7b 0d 0a 09 09 50 20 3d | 20 50 69 6e 67 53 74 61 |{....P =| PingSta|
|000031b0| 74 65 3b 0d 0a 09 09 69 | 66 28 50 20 3d 3d 20 50 |te;....i|f(P == P|
|000031c0| 53 5f 51 75 65 72 79 53 | 65 72 76 65 72 29 0d 0a |S_QueryS|erver)..|
|000031d0| 09 09 09 54 6f 74 61 6c | 52 65 74 75 72 6e 65 64 |...Total|Returned|
|000031e0| 53 65 72 76 65 72 73 20 | 3d 20 55 6e 70 69 6e 67 |Servers |= Unping|
|000031f0| 65 64 4c 69 73 74 2e 43 | 6f 75 6e 74 28 29 3b 0d |edList.C|ount();.|
|00003200| 0a 0d 0a 09 09 50 69 6e | 67 65 64 53 65 72 76 65 |.....Pin|gedServe|
|00003210| 72 73 20 3d 20 50 69 6e | 67 65 64 4c 69 73 74 2e |rs = Pin|gedList.|
|00003220| 43 6f 75 6e 74 28 29 3b | 0d 0a 09 09 54 6f 74 61 |Count();|....Tota|
|00003230| 6c 53 65 72 76 65 72 73 | 20 3d 20 55 6e 70 69 6e |lServers| = Unpin|
|00003240| 67 65 64 4c 69 73 74 2e | 43 6f 75 6e 74 28 29 20 |gedList.|Count() |
|00003250| 2b 20 50 69 6e 67 65 64 | 53 65 72 76 65 72 73 3b |+ Pinged|Servers;|
|00003260| 0d 0a 09 09 4d 79 53 65 | 72 76 65 72 73 20 3d 20 |....MySe|rvers = |
|00003270| 50 69 6e 67 65 64 4c 69 | 73 74 2e 43 6f 75 6e 74 |PingedLi|st.Count|
|00003280| 28 29 3b 0d 0a 0d 0a 09 | 09 45 20 3d 20 45 72 72 |();.....|.E = Err|
|00003290| 6f 72 53 74 72 69 6e 67 | 3b 0d 0a 09 7d 0d 0a 0d |orString|;...}...|
|000032a0| 0a 09 69 66 28 54 6f 74 | 61 6c 53 65 72 76 65 72 |..if(Tot|alServer|
|000032b0| 73 20 3e 20 30 29 0d 0a | 09 09 50 65 72 63 65 6e |s > 0)..|..Percen|
|000032c0| 74 43 6f 6d 70 6c 65 74 | 65 20 3d 20 50 69 6e 67 |tComplet|e = Ping|
|000032d0| 65 64 53 65 72 76 65 72 | 73 2a 31 30 30 2e 30 2f |edServer|s*100.0/|
|000032e0| 54 6f 74 61 6c 53 65 72 | 76 65 72 73 3b 0d 0a 0d |TotalSer|vers;...|
|000032f0| 0a 09 73 77 69 74 63 68 | 28 50 29 0d 0a 09 7b 0d |..switch|(P)...{.|
|00003300| 0a 09 63 61 73 65 20 50 | 53 5f 51 75 65 72 79 53 |..case P|S_QueryS|
|00003310| 65 72 76 65 72 3a 0d 0a | 09 09 69 66 28 54 6f 74 |erver:..|..if(Tot|
|00003320| 61 6c 52 65 74 75 72 6e | 65 64 53 65 72 76 65 72 |alReturn|edServer|
|00003330| 73 20 3e 20 30 29 0d 0a | 09 09 09 57 2e 44 65 66 |s > 0)..|...W.Def|
|00003340| 61 75 6c 74 53 74 61 74 | 75 73 42 61 72 54 65 78 |aultStat|usBarTex|
|00003350| 74 28 51 75 65 72 79 53 | 65 72 76 65 72 54 65 78 |t(QueryS|erverTex|
|00003360| 74 24 22 20 28 22 24 53 | 65 72 76 65 72 43 6f 75 |t$" ("$S|erverCou|
|00003370| 6e 74 4c 65 61 64 65 72 | 24 54 6f 74 61 6c 52 65 |ntLeader|$TotalRe|
|00003380| 74 75 72 6e 65 64 53 65 | 72 76 65 72 73 24 22 20 |turnedSe|rvers$" |
|00003390| 22 24 53 65 72 76 65 72 | 43 6f 75 6e 74 4e 61 6d |"$Server|CountNam|
|000033a0| 65 24 22 29 22 29 3b 0d | 0a 09 09 65 6c 73 65 0d |e$")");.|...else.|
|000033b0| 0a 09 09 09 57 2e 44 65 | 66 61 75 6c 74 53 74 61 |....W.De|faultSta|
|000033c0| 74 75 73 42 61 72 54 65 | 78 74 28 51 75 65 72 79 |tusBarTe|xt(Query|
|000033d0| 53 65 72 76 65 72 54 65 | 78 74 29 3b 0d 0a 09 09 |ServerTe|xt);....|
|000033e0| 62 72 65 61 6b 3b 0d 0a | 09 63 61 73 65 20 50 53 |break;..|.case PS|
|000033f0| 5f 51 75 65 72 79 46 61 | 69 6c 65 64 3a 0d 0a 09 |_QueryFa|iled:...|
|00003400| 09 57 2e 44 65 66 61 75 | 6c 74 53 74 61 74 75 73 |.W.Defau|ltStatus|
|00003410| 42 61 72 54 65 78 74 28 | 51 75 65 72 79 46 61 69 |BarText(|QueryFai|
|00003420| 6c 65 64 54 65 78 74 24 | 45 29 3b 0d 0a 09 09 62 |ledText$|E);....b|
|00003430| 72 65 61 6b 3b 0d 0a 09 | 63 61 73 65 20 50 53 5f |reak;...|case PS_|
|00003440| 50 69 6e 67 69 6e 67 3a | 0d 0a 09 63 61 73 65 20 |Pinging:|...case |
|00003450| 50 53 5f 52 65 50 69 6e | 67 69 6e 67 3a 0d 0a 09 |PS_RePin|ging:...|
|00003460| 09 57 2e 44 65 66 61 75 | 6c 74 53 74 61 74 75 73 |.W.Defau|ltStatus|
|00003470| 42 61 72 54 65 78 74 28 | 50 69 6e 67 69 6e 67 54 |BarText(|PingingT|
|00003480| 65 78 74 24 22 20 22 24 | 50 65 72 63 65 6e 74 43 |ext$" "$|PercentC|
|00003490| 6f 6d 70 6c 65 74 65 24 | 22 25 20 22 24 43 6f 6d |omplete$|"% "$Com|
|000034a0| 70 6c 65 74 65 54 65 78 | 74 24 22 2e 20 22 24 53 |pleteTex|t$". "$S|
|000034b0| 65 72 76 65 72 43 6f 75 | 6e 74 4c 65 61 64 65 72 |erverCou|ntLeader|
|000034c0| 24 4d 79 53 65 72 76 65 | 72 73 24 22 20 22 24 53 |$MyServe|rs$" "$S|
|000034d0| 65 72 76 65 72 43 6f 75 | 6e 74 4e 61 6d 65 24 22 |erverCou|ntName$"|
|000034e0| 2c 20 22 24 50 6c 61 79 | 65 72 43 6f 75 6e 74 4c |, "$Play|erCountL|
|000034f0| 65 61 64 65 72 24 50 69 | 6e 67 65 64 4c 69 73 74 |eader$Pi|ngedList|
|00003500| 2e 54 6f 74 61 6c 50 6c | 61 79 65 72 73 24 22 20 |.TotalPl|ayers$" |
|00003510| 22 24 50 6c 61 79 65 72 | 43 6f 75 6e 74 4e 61 6d |"$Player|CountNam|
|00003520| 65 29 3b 0d 0a 09 09 62 | 72 65 61 6b 3b 0d 0a 09 |e);....b|reak;...|
|00003530| 63 61 73 65 20 50 53 5f | 44 6f 6e 65 3a 0d 0a 09 |case PS_|Done:...|
|00003540| 09 57 2e 44 65 66 61 75 | 6c 74 53 74 61 74 75 73 |.W.Defau|ltStatus|
|00003550| 42 61 72 54 65 78 74 28 | 53 65 72 76 65 72 43 6f |BarText(|ServerCo|
|00003560| 75 6e 74 4c 65 61 64 65 | 72 24 4d 79 53 65 72 76 |untLeade|r$MyServ|
|00003570| 65 72 73 24 22 20 22 24 | 53 65 72 76 65 72 43 6f |ers$" "$|ServerCo|
|00003580| 75 6e 74 4e 61 6d 65 24 | 22 2c 20 22 24 50 6c 61 |untName$|", "$Pla|
|00003590| 79 65 72 43 6f 75 6e 74 | 4c 65 61 64 65 72 24 50 |yerCount|Leader$P|
|000035a0| 69 6e 67 65 64 4c 69 73 | 74 2e 54 6f 74 61 6c 50 |ingedLis|t.TotalP|
|000035b0| 6c 61 79 65 72 73 24 22 | 20 22 24 50 6c 61 79 65 |layers$"| "$Playe|
|000035c0| 72 43 6f 75 6e 74 4e 61 | 6d 65 29 3b 0d 0a 09 09 |rCountNa|me);....|
|000035d0| 62 72 65 61 6b 3b 0d 0a | 09 7d 0d 0a 7d 0d 0a 0d |break;..|.}..}...|
|000035e0| 0a 00 | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
